[Greater-commits] r3608 - trunk/packaging

scm-commit@wald.intevation.org scm-commit at wald.intevation.org
Mon Jul 18 11:32:27 CEST 2011


Author: aheinecke
Date: 2011-07-18 11:32:27 +0200 (Mon, 18 Jul 2011)
New Revision: 3608

Modified:
   trunk/packaging/greater-installer.nsi
Log:
Cleanup installdir after uninstallation


Modified: trunk/packaging/greater-installer.nsi
===================================================================
--- trunk/packaging/greater-installer.nsi	2011-07-18 09:32:05 UTC (rev 3607)
+++ trunk/packaging/greater-installer.nsi	2011-07-18 09:32:27 UTC (rev 3608)
@@ -379,12 +379,26 @@
   ; Delete Registry keys
   DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${productname_short}"
   DeleteRegKey HKLM "Software\${productname_short}"
+
+  ; Delete Shortcuts
+  SetShellVarContext all
+  RMDir /R  "$SMPROGRAMS\${productname}"
+  Delete "$DESKTOP\${productname_short}.lnk"
+  Delete "$QUICKLAUNCH\${productname_short}.lnk"
+  SetShellVarContext current
+  RMDir /R  "$SMPROGRAMS\${productname}"
+  Delete "$DESKTOP\${productname_short}.lnk"
+  Delete "$QUICKLAUNCH\${productname_short}.lnk"
+
+  ; Cleanup
+  RMDir /R "$INSTDIR\GREAT-ER"
+  RMDir "$INSTDIR\GREAT-ER-DB"
+  RMDir "$INSTDIR\Administration"
+  Delete "$INSTDIR\Uninstall.exe"
+  RMDir "$INSTDIR"
 SectionEnd
 
 Section "un.PostgreSQL" UnSecPostgreSQL
-  MessageBox MB_YESNO|MB_ICONQUESTION "Do you really wish to uninstall PostgreSQL?\
-  This will also remove all data from your GREAT-ER Database!" \
-  IDYES uninstallPostgreSQL IDNO no
   uninstallPostgreSQL:
    Banner::show /NOUNLOAD /set 76 "Uninstalling PostgreSQL..."
    ; TODO find path from registry and uninstall
@@ -392,7 +406,12 @@
    Banner::destroy 
    RMDIR "$INSTDIR\postgres9"
    RMDIR "$INSTDIR"
-  no:
+   MessageBox MB_YESNO|MB_ICONQUESTION "Do you also want to delete contents of your \
+   GREAT-ER Database?" \
+   IDYES deletedb IDNO no
+   deletedb:
+   RMDIR /r "$INSTDIR\GREAT-ER-DB\database"
+   no:
 SectionEnd
 
 Section "un.Python"
@@ -431,7 +450,6 @@
   StrCmp $1 "Admin" leave +1
   MessageBox MB_OK|MB_ICONEXCLAMATION "$(T_AdminNeeded_uninstall)"
   Quit
-
  leave:
 FunctionEnd
 



More information about the Greater-commits mailing list