Index: components/synedit/syngutterlineoverview.pp
===================================================================
--- components/synedit/syngutterlineoverview.pp	(revision 52254)
+++ components/synedit/syngutterlineoverview.pp	(working copy)
@@ -304,6 +304,7 @@
     function  TextLineToPixelEnd(ALine: Integer): Integer;
     procedure DoResize(Sender: TObject); override;
     Procedure PaintWinControl(Sender: TObject);
+    Procedure OnClickWinControl(Sender: TObject);
   public
     destructor Destroy; override;
     procedure Assign(Source: TPersistent); override;
@@ -1267,7 +1268,6 @@
 end;
 
 { TSynGutterLineOverview }
-
 procedure TSynGutterLineOverview.Init;
 begin
   inherited Init;
@@ -1277,6 +1277,7 @@
   FWinControl.Parent := SynEdit;
   FWinControl.DoubleBuffered := SynEdit.DoubleBuffered;
   FWinControl.OnPaint := @PaintWinControl;
+  FWinControl.OnClick := @OnClickWinControl;
 
   FLineMarks := TSynGutterLOvLineMarksList.Create;
   FProviders := TSynGutterLineOverviewProviderList.Create(Self);
@@ -1423,6 +1424,31 @@
     FLineMarks[i].Paint(FWinControl.Canvas, AClip, 0, MarkHeight);
 end;
 
+procedure TSynGutterLineOverview.OnClickWinControl(Sender: TObject);
+var
+  i, markPixLine: Integer;
+  TextLine, ClientMouseY : Integer;
+
+begin
+  TextLine := -1;
+  ClientMouseY := Mouse.CursorPos.y - TWinControl(Sender).ClientOrigin.y;
+
+  for i:= 0 to FLineMarks.Count-1 do
+  begin
+    markPixLine:= FLineMarks.GetLineMarks(i).PixLine;
+    if (ClientMouseY >= markPixLine) and (ClientMouseY <= (markPixLine+MarkHeight)) then
+    begin
+      TextLine := FLineMarks.GetLineMarks(i).GetMark(0).Line;
+      break;
+    end;
+  end;
+  // no marker where selected then exit
+  if TextLine < 0 then exit;
+
+  CaretObj.CharPos := 0;
+  CaretObj.LinePos := TextLine;
+end;
+
 function TSynGutterLineOverview.GetMarkHeight: Integer;
 begin
   Result := FLineMarks.ItemHeight;