paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-15 15:35:55 +02:00
Code Issues Packages Projects Releases Wiki Activity

Installer, Win: allow "pre-release" in version name (inno setup)

Browse Source 
git-svn-id: trunk@42825 -
This commit is contained in:
martin 2013-09-15 18:20:56 +00:00
parent 156b1bffea
commit 2899e3dc78
2 changed files with 12 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tools/install/win/lazarus-cross.iss
View File

@ -6,8 +6,12 @@ EnableISX=true
// A valid file version contains only digits, so drop the RC part
#if pos('RC',AppVersion)>0
#define FileVersion = copy(AppVersion, 1, pos('RC', AppVersion)-1)
#else
#define FileVersion = AppVersion
#else
#if pos('pre',AppVersion)>0
#define FileVersion = copy(AppVersion, 1, pos('pre', AppVersion)-1)
#else
#define FileVersion = AppVersion
#endif
#endif
#define LazRevision GetEnv('LazRevision')
#define FPCVersion GetEnv('FPCVersion')

8
tools/install/win/lazarus.iss
View File

@ -6,8 +6,12 @@ EnableISX=true
// A valid file version contains only digits, so drop the RC part
#if pos('RC',AppVersion)>0
#define FileVersion = copy(AppVersion, 1, pos('RC', AppVersion)-1)
#else
#define FileVersion = AppVersion
#else
#if pos('pre',AppVersion)>0
#define FileVersion = copy(AppVersion, 1, pos('pre', AppVersion)-1)
#else
#define FileVersion = AppVersion
#endif
#endif
#define FPCVersion GetEnv('FPCVersion')
#define FPCTargetOS GetEnv('FPCTargetOS')