On Windows, remove previously installed version in the NSIS installer

input-output-hk · Jul 13, 2023 · 85c5df5 · 85c5df5
1 parent 693351d
commit 85c5df5
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/installers/common/WindowsInstaller.hs b/installers/common/WindowsInstaller.hs
@@ -209,6 +209,10 @@ writeInstallerNSIS outName (Version fullVersion') InstallerConfig{installDirecto
                 iff_ (not_ (lockfileDeleted)) $ do
                     unsafeInject $ T.unpack $ "Abort \"" <> installDirectory <> " $(AlreadyRunning)\""
 
+                iff_ (fileExists "$INSTDIR") $ do
+                  detailPrint "Removing previously installed version"
+                  rmdir [Recursive] "$INSTDIR"
+
                 iff_ (fileExists "$APPDATA\\$InstallDir\\Wallet-1.0\\open\\*.*") $
                     rmdir [] "$APPDATA\\$InstallDir\\Wallet-1.0\\open"
                 case oBackend of