summaryrefslogtreecommitdiffstats
path: root/Config.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-05-21 21:07:49 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-05-21 21:07:49 +0200
commit4672491cdad0680c59451a4c15e38270cf0f472c (patch)
treecc9f33c73efeca353d6095bf1900a42cd8d1c869 /Config.hs
parent559ac9e9d5c61c08317cb96cfadb07206c663855 (diff)
downloadmetatile-4672491cdad0680c59451a4c15e38270cf0f472c.tar
metatile-4672491cdad0680c59451a4c15e38270cf0f472c.zip
Put restart in the X monad
darcs-hash:20070521190749-a5988-1c95a0491806b06a32e7fe8bd6bcac31ebc7ad6b
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs2
1 files changed, 1 insertions, 1 deletions
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)