paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-06 15:41:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

DebugManager: fix an error in earlier commit when initializing a variable.

Browse Source 
git-svn-id: trunk@48454 -
This commit is contained in:
juha 2015-03-22 11:54:27 +00:00
parent 46d3e09630
commit fbbe781a3c
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ide/debugmanager.pas
View File

@ -1349,8 +1349,10 @@ begin
SrcLine := -1;
end;
end
else
else begin
NewSource := Nil;
SrcLine := -1;
end;
ReleaseRefAndNil(CurrentSourceUnitInfo);
@ -1368,10 +1370,8 @@ begin
end;
Editor := nil;
if SourceEditorManager <> nil then
Editor := SourceEditorManager.SourceEditorIntfWithFilename(NewSource.Filename)
else
NewSource := Nil;
if SourceEditorManager <> nil
then Editor := SourceEditorManager.SourceEditorIntfWithFilename(NewSource.Filename);
// jump editor to execution line
Flags := [jfAddJumpPoint, jfSearchVirtualFullPath];