o D'oh! We only make backups if the file exists.

diff --git a/setup/setup-openssh.pl b/setup/setup-openssh.pl
index 0b1dc70f6437d5752734e6ed87480756970417c4..ac96b1477876cc4a30f89d08af6aaafd00cf1f3e 100644 (file)
--- a/setup/setup-openssh.pl
+++ b/setup/setup-openssh.pl
@@ -63,11 +63,14 @@ sub copy_setup_files
     if ( -e "${sysconfdir}/ssh_config" )
     {
         $response = query_boolean("${sysconfdir}/ssh_config already exists.  Overwrite? ", "n");
+        if ($response eq "y")
+        {
+            action("cp ${sysconfdir}/ssh_config ${sysconfdir}/ssh_config.bak_${curr_time}");
+        }
     }
 
     if ($response eq "y")
     {
-        action("cp ${sysconfdir}/ssh_config ${sysconfdir}/ssh_config.bak_${curr_time}");
         action("cp ${globusdir}/setup/globus/ssh_config ${sysconfdir}/ssh_config");
     }
 
@@ -79,11 +82,14 @@ sub copy_setup_files
     if ( -e "${sysconfdir}/sshd_config" )
     {
         $response = query_boolean("${sysconfdir}/sshd_config already exists.  Overwrite? ", "n");
+        if ($response eq "y")
+        {
+            action("cp ${sysconfdir}/sshd_config ${sysconfdir}/sshd_config.bak_${curr_time}");
+        }
     }
 
     if ($response eq "y")
     {
-        action("cp ${sysconfdir}/sshd_config ${sysconfdir}/sshd_config.bak_${curr_time}");
         action("cp ${globusdir}/setup/globus/sshd_config ${sysconfdir}/sshd_config");
     }
 
@@ -95,11 +101,14 @@ sub copy_setup_files
     if ( -e "${sysconfdir}/moduli" )
     {
         $response = query_boolean("${sysconfdir}/moduli already exists.  Overwrite? ", "n");
+        if ($response eq "y")
+        {
+            action("cp ${sysconfdir}/moduli ${sysconfdir}/moduli.bak_${curr_time}");
+        }
     }
 
     if ($response eq "y")
     {
-        action("cp ${sysconfdir}/moduli ${sysconfdir}/moduli.bak_${curr_time}");
         action("cp ${globusdir}/setup/globus/moduli ${sysconfdir}/moduli");
     }
 }