mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-14 07:59:27 +02:00
* Do not add version-numbers to filenames on 8.3 fs hosts
git-svn-id: trunk@28970 -
This commit is contained in:
parent
684400b8e4
commit
254cc2e7a7
@ -3362,7 +3362,7 @@ begin
|
||||
If (FFileName<>'') then
|
||||
Result:=FFileName
|
||||
else
|
||||
if not FVersion.Empty then
|
||||
if not FVersion.Empty and not (Defaults.BuildOS in AllLimit83fsOses) then
|
||||
Result := Name + '-' + FVersion.AsString
|
||||
else
|
||||
Result := Name;
|
||||
|
Loading…
Reference in New Issue
Block a user