バタ59リリース2向けに更新

[gikonavigoeson/gikonavi.git] / GikoDataModule.pas

diff --git a/GikoDataModule.pas b/GikoDataModule.pas
index 66c5223..4011a7f 100644 (file)
--- a/GikoDataModule.pas
+++ b/GikoDataModule.pas
@@ -4582,8 +4582,10 @@ begin
     try
         form.ShowModal;
         shutdown := form.Allowshutdown;
-        GikoForm.UpdateExePath := form.ExecPath;
-        GikoForm.UpdateExeArgs := form.ExecArgs;
+        if shutdown then begin
+            GikoForm.UpdateExePath := form.ExecPath;
+            GikoForm.UpdateExeArgs := form.ExecArgs;
+        end;
     finally
         form.Release;
     end;