Imported web css properties to styles xml

[pithos-ms-client] / trunk / Pithos.Installer / PithosPlus.iss

diff --git a/trunk/Pithos.Installer/PithosPlus.iss b/trunk/Pithos.Installer/PithosPlus.iss
index 9220ae0..3e555a1 100644 (file)
--- a/trunk/Pithos.Installer/PithosPlus.iss
+++ b/trunk/Pithos.Installer/PithosPlus.iss
@@ -313,7 +313,7 @@ dotNET40Missing: Boolean;
       UsagePage: TOutputMsgWizardPage;\r
       Wz1, Wz2 : TOutputMsgWizardPage;\r
          ChkBox: TCheckBox;\r
-        LicenseID: Integer;      \r
+      LicenseID: Integer;      \r
 \r
 // IssFindModule called on in/uninstall\r
 ///function IssFindModule(hWnd: Integer; Modulename: String; Language: PAnsiChar; Silent: Boolean; CanIgnore: Boolean ): Integer;\r
@@ -417,6 +417,9 @@ begin
       dotNET40Missing := True;\r
     \r
   Result := True;\r
+\r
+  //Remove Old Database\r
+  DeleteFile(ExpandConstant('{localappdata}')+'\GRNET\PITHOS\pithos.db');\r
 end;\r
 \r
 procedure DeinitializeSetup();\r
@@ -458,7 +461,6 @@ begin
           begin            \r
             DelTree(ExpandConstant('{localappdata}')+'\GRNET\PithosPlus.exe_StrongName_1vmy3hmn3mscykecwcnmpvno4d4mqi52',true,true,true);     \r
             DelTree(ExpandConstant('{localappdata}')+'\GRNET\PITHOS\',true,true,true);\r
-            \r
           End\r
         else\r
           MsgBox ('Settings will not be removed', mbInformation, MB_OK);        \r