2
0
Эх сурвалжийг харах

Fix small logic error in zipping

Reinier Olislagers 11 жил өмнө
parent
commit
4bbac2643a
1 өөрчлөгдсөн 8 нэмэгдсэн , 8 устгасан
  1. 8 8
      backuprestore.pas

+ 8 - 8
backuprestore.pas

@@ -209,15 +209,15 @@ begin
         end;
       end;
 
-      try
-        if TempFile='' then
-          BackupFile:= UserFile // no zip files involved
-        else
-          {backup to temp, then zip later or
-          restore from temp file}
-          BackupFile:= TempFile;
+      if TempFile='' then
+        BackupFile:= UserFile // no zip files involved
+      else
+        {backup to temp, then zip later or
+        restore from temp file}
+        BackupFile:= TempFile;
 
-        AttachService;
+      AttachService;
+      try
         if cbOperation.ItemIndex = 0 then
           StartBackup
         else