From ce9041ea17ac49d7b9376101f7170176677fcddb Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Wed, 20 May 2009 03:47:00 +0000
Subject: [PATCH] lcl: don't start immediate drag on dock header click

git-svn-id: trunk@20063 -
---
 lcl/ldocktree.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/ldocktree.pas b/lcl/ldocktree.pas
index c77c793bd4..ebaf661c2a 100644
--- a/lcl/ldocktree.pas
+++ b/lcl/ldocktree.pas
@@ -507,7 +507,7 @@ begin
   case APart of
     ldhpAll, ldhpCaption:
       // mouse down on not buttons => start drag
-      AControl.BeginDrag(True);
+      AControl.BeginDrag(False);
   end;
 end;