From 32f7affb2bed6c64aa41710ee269534fe47ecb07 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Sun, 15 Sep 2013 12:51:07 +0000
Subject: [PATCH] IDE, Debugger: Display exe-line markers (blue dots) in last
 line of file too

git-svn-id: trunk@42806 -
---
 ide/sourceeditor.pp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp
index 3199432a26..4f7775c02c 100644
--- a/ide/sourceeditor.pp
+++ b/ide/sourceeditor.pp
@@ -5379,7 +5379,7 @@ begin
   j := -1;
   EditorComponent.IDEGutterMarks.BeginSetDebugMarks;
   try
-    for i := 0 to EditorComponent.Lines.Count - 1 do
+    for i := 1 to EditorComponent.Lines.Count do
     begin
       Addr := DebugBoss.LineInfo.GetAddress(idx, i);
       if (Addr <> 0) and (j < 0) then
@@ -5390,7 +5390,7 @@ begin
       end;
     end;
     if (Addr <> 0) and (j >= 0) then
-      EditorComponent.IDEGutterMarks.SetDebugMarks(j, EditorComponent.Lines.Count - 1);
+      EditorComponent.IDEGutterMarks.SetDebugMarks(j, EditorComponent.Lines.Count);
   finally
     EditorComponent.IDEGutterMarks.EndSetDebugMarks;
   end;