paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 05:39:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Remove gtk2 MouseCapture workaround (after bug #13878 is fixed now). workaround was for issue #12460

Browse Source 
git-svn-id: trunk@27644 -
This commit is contained in:
martin 2010-10-10 21:20:31 +00:00
parent 700bc8469b
commit b944234141
1 changed files with 0 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
components/synedit/synedit.pp
View File

@ -2712,11 +2712,6 @@ var
Z: integer;
begin
Exclude(FStateFlags, sfHideCursor);
{$IF defined(LCLGTK) or defined(LCLGTK2)}
// This is to temporarily address issue http://bugs.freepascal.org/view.php?id=12460
if (sfMouseSelecting in fStateFlags) and not MouseCapture then
MouseCapture := True;
{$ENDIF}
inherited MouseMove(Shift, x, y);
if (sfLeftGutterClick in fStateFlags) then
FLeftGutter.MouseMove(Shift, X, Y);
@ -4540,13 +4535,6 @@ begin
{$IFDEF VerboseFocus}
DebugLn(['[TCustomSynEdit.WMKillFocus] A ',Name, ' time=', dbgs(Now*86640)]);
{$ENDIF}
{$IF defined(LCLGTK) or defined(LCLGTK2)}
// This is to temporarily address issue http://bugs.freepascal.org/view.php?id=12460
if (sfMouseSelecting in fStateFlags) and not MouseCapture then begin
Exclude(fStateFlags, sfMouseSelecting);
Exclude(fStateFlags, sfIgnoreUpClick);
end;
{$ENDIF}
LastMouseCaret:=Point(-1,-1);
// Todo: Under Windows, keeping the Caret only works, if no other component creates a caret
if not (eoPersistentCaret in fOptions) then begin