mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-06 05:02:25 +02:00
IDE: fixed changing empty project target file
git-svn-id: trunk@48640 -
This commit is contained in:
parent
6469a000d3
commit
3024ff1269
@ -1955,7 +1955,7 @@ begin
|
||||
if Result='' then
|
||||
begin
|
||||
// the compiler cuts off the source extension
|
||||
TargetFilename:=ExtractFileNameOnly(GetDefaultMainSourceFileName);
|
||||
Result:=ExtractFileNameOnly(GetDefaultMainSourceFileName);
|
||||
end else begin
|
||||
if Assigned(ParsedOpts.OnLocalSubstitute) then
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user