From f3dbd667811781ed438e3c094d3651bf4b7bf84b Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Fri, 24 Aug 2007 06:59:39 +0200
Subject: Add docstrings for mouse controls

darcs-hash:20070824045939-a5988-2c9c3dd3cb6925c0aaccc0c857335c15d4deaf3c
---
 Config.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/Config.hs b/Config.hs
index dfd99af..34dae0e 100644
--- a/Config.hs
+++ b/Config.hs
@@ -178,6 +178,9 @@ keys = M.fromList $
 --
 mouseBindings :: M.Map (KeyMask, Button) (Window -> X ())
 mouseBindings = M.fromList $
+    -- mod-button1 @@ Set the window to floating mode and move by dragging
     [ ((modMask, button1), (\w -> focus w >> mouseMoveWindow w))
+    -- mod-button2 @@ Raise the window to the top of the stack
     , ((modMask, button2), (\w -> focus w >> swapMaster))
+    -- mod-button3 @@ Set the window to floating mode and resize by dragging
     , ((modMask, button3), (\w -> focus w >> mouseResizeWindow w)) ]
-- 
cgit v1.2.3