From 349a52af729ffa57d75538ee6f939d3b52a4a1ff Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Wed, 30 Sep 2009 22:03:11 +0200 Subject: Remove redundant ($) in A.Commands Ignore-this: 63084d42007481b0e0ca5fd99d3ba083 darcs-hash:20090930200311-1499c-4cc53ff235c5c3d13c10ecbb6502b3ca0294b77a.gz --- XMonad/Actions/Commands.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'XMonad/Actions/Commands.hs') diff --git a/XMonad/Actions/Commands.hs b/XMonad/Actions/Commands.hs index f513990..21a48f6 100644 --- a/XMonad/Actions/Commands.hs +++ b/XMonad/Actions/Commands.hs @@ -93,11 +93,11 @@ defaultCommands = do , ("run" , spawn "exe=`dmenu_path | dmenu -b` && exec $exe" ) , ("kill" , kill ) , ("refresh" , refresh ) - , ("focus-up" , windows $ focusUp ) - , ("focus-down" , windows $ focusDown ) - , ("swap-up" , windows $ swapUp ) - , ("swap-down" , windows $ swapDown ) - , ("swap-master" , windows $ swapMaster ) + , ("focus-up" , windows focusUp ) + , ("focus-down" , windows focusDown ) + , ("swap-up" , windows swapUp ) + , ("swap-down" , windows swapDown ) + , ("swap-master" , windows swapMaster ) , ("sink" , withFocused $ windows . sink ) , ("quit-wm" , io $ exitWith ExitSuccess ) ] -- cgit v1.2.3