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

IDE: always add a jump point in DoJumpToOtherProcedureSection (Ctrl+Shift+Up/Down).

Browse Source 
git-svn-id: trunk@54151 -
This commit is contained in:
ondrej 2017-02-13 23:30:16 +00:00
parent e25135a833
commit 10d7555bc9
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/main.pp
View File

@ -9725,8 +9725,7 @@ begin
if CodeToolBoss.JumpToMethod(ActiveUnitInfo.Source,
LogCaret.X,LogCaret.Y,NewSource,NewX,NewY,NewTopLine,RevertableJump) then
begin
Flags := [jfFocusEditor];
if not RevertableJump then include(Flags, jfAddJumpPoint);
Flags := [jfFocusEditor, jfAddJumpPoint];
DoJumpToCodePosition(ActiveSrcEdit, ActiveUnitInfo,
NewSource, NewX, NewY, NewTopLine, Flags);
end else begin