From ad4417c8e05149b557d1ce3a9fbffe656f5d2282 Mon Sep 17 00:00:00 2001
From: dlahoti <deven.lahoti@gmail.com>
Date: Sun, 15 May 2016 10:46:14 -0400
Subject: [PATCH] clicked -> dragged

---
 src/XMonad/Operations.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/XMonad/Operations.hs b/src/XMonad/Operations.hs
index 98a334b..153b5a2 100644
--- a/src/XMonad/Operations.hs
+++ b/src/XMonad/Operations.hs
@@ -507,7 +507,7 @@ mouseDrag f done = do
                     clearEvents pointerMotionMask
                     return z
 
--- | drag the window under the cursor with the mouse while it is clicked
+-- | drag the window under the cursor with the mouse while it is dragged
 mouseMoveWindow :: Window -> X ()
 mouseMoveWindow w = whenX (isClient w) $ withDisplay $ \d -> do
     io $ raiseWindow d w
@@ -519,7 +519,7 @@ mouseMoveWindow w = whenX (isClient w) $ withDisplay $ \d -> do
                                              (fromIntegral (fromIntegral (wa_y wa) + (ey - oy))))
               (float w)
 
--- | resize the window under the cursor with the mouse while it is clicked
+-- | resize the window under the cursor with the mouse while it is dragged
 mouseResizeWindow :: Window -> X ()
 mouseResizeWindow w = whenX (isClient w) $ withDisplay $ \d -> do
     io $ raiseWindow d w