Author: reinhard Date: 2009-12-05 10:21:08 -0600 (Sat, 05 Dec 2009) New Revision: 10076
Modified: trunk/gnue-navigator/packaging/win32/gnue-navigator.iss.dist_template Log: Some fixes to Windows packaging. Modified: trunk/gnue-navigator/packaging/win32/gnue-navigator.iss.dist_template =================================================================== --- trunk/gnue-navigator/packaging/win32/gnue-navigator.iss.dist_template 2009-12-05 16:06:55 UTC (rev 10075) +++ trunk/gnue-navigator/packaging/win32/gnue-navigator.iss.dist_template 2009-12-05 16:21:08 UTC (rev 10076) @@ -28,9 +28,9 @@ [Files] Source: C:\GNUe\Bin\gnue-navigator.exe; DestDir: {app}\Bin; Components: main; Flags: ignoreversion -Source: C:\GNUe\Bin\gnue\navigator\*.*; DestDir: {app}\Bin\gnue\forms; Flags: recursesubdirs ignoreversion; Components: main +Source: C:\GNUe\Bin\gnue\navigator\*.*; DestDir: {app}\Bin\gnue\navigator; Flags: recursesubdirs ignoreversion; Components: main Source: C:\GNUe\share\locale\gnue-navigator.mo; DestDir: {app}\share\locale\; Flags: recursesubdirs createallsubdirs; Components: translations -Source: C:\GNUe\share\doc\gnue-navigator\*.*; DestDir: {app}\share\doc\gnue-forms; Flags: recursesubdirs; Components: doc +Source: C:\GNUe\share\doc\gnue-navigator\*.*; DestDir: {app}\share\doc\gnue-navigator; Flags: recursesubdirs; Components: doc [Registry] ; These four associations associate GPD files with GNUe Navigator @@ -68,17 +68,23 @@ sPrevPath := GetPathInstalled( sprevID ); if ( Length(sPrevPath) > 0 ) then - Result := true - else - begin + Result := true + else begin MsgBox( 'GNUe-Runtime-Environment is not installed!', mbInformation, MB_OK ); Result := false; - end; + end; if (Length(GetPathInstalled('GNUe-Common')) > 0) then Result := true else begin - MsgBox('GNUe-Common is not installed! Please install the GNUe-Common package in order to setup GNUe-Forms.', mbInformation, MB_OK); + MsgBox('GNUe-Common is not installed! Please install the GNUe-Common package in order to setup GNUe-Navigator.', mbInformation, MB_OK); Result := false; end; + + if (Length(GetPathInstalled('GNUe-Forms')) > 0) then + Result := true + else begin + MsgBox('GNUe-Forms is not installed! Please install the GNUe-Forms package in order to setup GNUe-Navigator.', mbInformation, MB_OK); + Result := false; + end; end; _______________________________________________ commit-gnue mailing list commit-gnue@gnu.org http://lists.gnu.org/mailman/listinfo/commit-gnue