From f11635c29f10e173d404bec768ddf5bccb878d5b Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Mon, 21 May 2007 21:07:49 +0200
Subject: Put restart in the X monad

darcs-hash:20070521190749-a5988-1c95a0491806b06a32e7fe8bd6bcac31ebc7ad6b.gz
---
 Config.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Config.hs')

diff --git a/Config.hs b/Config.hs
index 2c6c647..0b738a6 100644
--- a/Config.hs
+++ b/Config.hs
@@ -169,7 +169,7 @@ keys = M.fromList $
     , ((modMask .|. shiftMask, xK_c     ), kill)
 
     , ((modMask .|. shiftMask, xK_q                     ), io $ exitWith ExitSuccess)
-    , ((modMask .|. shiftMask .|. controlMask, xK_q     ), io restart)
+    , ((modMask .|. shiftMask .|. controlMask, xK_q     ), restart)
 
     -- Cycle the current tiling order
     , ((modMask,               xK_Return), swap)
-- 
cgit v1.2.3