• R/O
  • SSH
  • HTTPS

dzprepbuild: Commit


Commit MetaInfo

Révision81 (tree)
l'heure2019-11-03 01:34:31
Auteurdummzeuch

Message de Log

Bugfix: The project file name was passed with .dpr extension.

Change Summary

Modification

--- trunk/src/u_CentralIniVersionInfo.pas (revision 80)
+++ trunk/src/u_CentralIniVersionInfo.pas (revision 81)
@@ -30,7 +30,7 @@
3030 public
3131 ///<summary>
3232 /// Creates a TCentralVersionInfo instance
33- /// @param ProjectBaseFn is the name of the project (.dpr file without extension)
33+ /// @param ProjectBaseFn is the name of the project (.dpr file with or without extension)
3434 /// The constructor appends "_Version.ini" to this
3535 /// name and tries to open the file }
3636 constructor Create(const _ProjectBaseFn: string);
@@ -52,7 +52,7 @@
5252 constructor TCentralIniVersionInfo.Create(const _ProjectBaseFn: string);
5353 begin
5454 inherited Create(ChangeFileExt(_ProjectBaseFn, '_Version.ini'),
55- ExtractFileName(_ProjectBaseFn),
55+ ChangeFileExt(ExtractFileName(_ProjectBaseFn), ''),
5656 VERSION_INFO_SECTION, VERSION_INFO_KEYS_SECTION);
5757 end;
5858
Afficher sur ancien navigateur de dépôt.