paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 20:59:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

Revert r54505 #04365103ff. Issue #31577 must be solved properly later.

Browse Source 
git-svn-id: trunk@54546 -
This commit is contained in:
juha 2017-04-06 18:11:39 +00:00
parent 3c525fb548
commit 679a0eb54d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/debugmanager.pas
View File

@ -582,7 +582,7 @@ function TDebugManager.GetFullFilename(const AUnitinfo: TDebuggerUnitInfo;
procedure ResolveFromDbg; procedure ResolveFromDbg;
begin begin
Filename := AUnitinfo.FileName; Filename := AUnitinfo.DbgFullName;
Result := Filename <> ''; Result := Filename <> '';
debugln(DBG_LOCATION_INFO, ['ResolveFromDbg Init Filename=', Filename]); debugln(DBG_LOCATION_INFO, ['ResolveFromDbg Init Filename=', Filename]);
if Result then if Result then