• R/O
  • SSH
  • HTTPS

dzprepbuild: Commit


Commit MetaInfo

Révision76 (tree)
l'heure2019-11-02 22:24:24
Auteurdummzeuch

Message de Log

Bugfix: The entries in the .DOF files are also called Private / Special not IsPrivateBuild / IsSpecialBuild

Change Summary

Modification

--- trunk/src/u_IniVersionInfo.pas (revision 75)
+++ trunk/src/u_IniVersionInfo.pas (revision 76)
@@ -144,8 +144,8 @@
144144 _VerInfo.SCMRevision := ReadString(FInfoKeysSection, 'Revision', '');
145145 _VerInfo.BuildDateTime := ReadString(FInfoKeysSection, 'BuildDateTime', '');
146146
147- _VerInfo.IsPrivateBuild := ReadBool(FInfoSection, 'IsPrivateBuild', False);
148- _VerInfo.IsSpecialBuild := ReadBool(FInfoSection, 'IsSpecialBuild', False);
147+ _VerInfo.IsPrivateBuild := ReadBool(FInfoSection, 'Private', False);
148+ _VerInfo.IsSpecialBuild := ReadBool(FInfoSection, 'Special', False);
149149 _VerInfo.PrivateBuildComments := ReadString(FInfoKeysSection, 'PrivateBuild', '');
150150 _VerInfo.SpecialBuildComments := ReadString(FInfoKeysSection, 'SpecialBuild', '');
151151 end;
@@ -170,8 +170,8 @@
170170 WriteString(FInfoSection, 'Revision', _VerInfo.SCMRevision);
171171 WriteString(FInfoKeysSection, 'BuildDateTime', _VerInfo.BuildDateTime);
172172
173- WriteBool(FInfoSection, 'IsPrivateBuild', _VerInfo.IsPrivateBuild);
174- WriteBool(FInfoSection, 'IsSpecialBuild', _VerInfo.IsSpecialBuild);
173+ WriteBool(FInfoSection, 'Private', _VerInfo.IsPrivateBuild);
174+ WriteBool(FInfoSection, 'Special', _VerInfo.IsSpecialBuild);
175175 WriteString(FInfoKeysSection, 'PrivateBuild', _VerInfo.PrivateBuildComments);
176176 WriteString(FInfoKeysSection, 'SpecialBuild', _VerInfo.SpecialBuildComments);
177177
Afficher sur ancien navigateur de dépôt.