From 8f6c3765e0bae0ec8284ce16d69f94104d0c3df7 Mon Sep 17 00:00:00 2001
From: David Roundy <droundy@darcs.net>
Date: Wed, 5 Sep 2007 14:41:39 +0200
Subject: make dragPane handle thinner.

darcs-hash:20070905124139-72aca-d70823e057c88fa039e518259a3896f10fa39aed.gz
---
 DragPane.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'DragPane.hs')

diff --git a/DragPane.hs b/DragPane.hs
index 8207be8..17884c3 100644
--- a/DragPane.hs
+++ b/DragPane.hs
@@ -40,7 +40,7 @@ import StackSet ( focus, up, down)
 -- > dragPane "" (fromRational delta) (fromRational delta)
 
 halfHandleWidth :: Integral a => a
-halfHandleWidth = 2
+halfHandleWidth = 1
 
 handleColor :: String
 handleColor = "#000000"
-- 
cgit v1.2.3