paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-27 09:13:48 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed loading bookmarks for editor index 0

Browse Source 
git-svn-id: trunk@3075 -
This commit is contained in:
mattias 2002-08-18 08:57:30 +00:00
parent e5f8eb4d0d
commit d864feaa80
1 changed files with 5 additions and 0 deletions

5
ide/main.pp
View File

@ -3379,6 +3379,8 @@ begin
i:=Project1.Bookmarks.IndexOfID(BookmarkID);
if i<0 then continue;
if (Project1.Bookmarks[i].EditorIndex=AnUnitInfo.EditorIndex) then begin
//writeln('TMainIDE.DoRestoreBookMarks ',BookmarkID,' ',
// Project1.Bookmarks[i].CursorPos.X,' ',Project1.Bookmarks[i].CursorPos.Y);
ASrcEdit.EditorComponent.SetBookmark(BookmarkID,
Project1.Bookmarks[i].CursorPos.X,Project1.Bookmarks[i].CursorPos.Y);
end;
@ -9020,6 +9022,9 @@ end.
{ =============================================================================
$Log$
Revision 1.595 2003/06/03 16:12:14 mattias
fixed loading bookmarks for editor index 0
Revision 1.594 2003/06/03 08:02:33 mattias
implemented showing source lines in breakpoints dialog