summaryrefslogtreecommitdiffstats
path: root/Main.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-11-01 08:31:47 +0100
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-11-01 08:31:47 +0100
commitb6c1dfc021f3be6e3de0c4a858a7326bdc7bbef7 (patch)
treeaa71d062d14a44114544139c5a0071574cd2806d /Main.hs
parentb7e7fa2399db8c05fdcf0edf9189dfefaa904cef (diff)
downloadmetatile-b6c1dfc021f3be6e3de0c4a858a7326bdc7bbef7.tar
metatile-b6c1dfc021f3be6e3de0c4a858a7326bdc7bbef7.zip
Eliminate defaultTerminal
darcs-hash:20071101073147-a5988-9c2da610e085026e3a1b981114b116718331273c
Diffstat (limited to 'Main.hs')
-rw-r--r--Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Main.hs b/Main.hs
index 05cad2d..b249431 100644
--- a/Main.hs
+++ b/Main.hs
@@ -157,7 +157,7 @@ layout = tiled ||| Mirror tiled ||| Full
keys :: M.Map (KeyMask, KeySym) (X ())
keys = M.fromList $
-- launching and killing programs
- [ ((modMask .|. shiftMask, xK_Return), asks terminal >>= spawn) -- %! Launch terminal
+ [ ((modMask .|. shiftMask, xK_Return), asks (terminal . config) >>= spawn) -- %! Launch terminal
, ((modMask, xK_p ), spawn "exe=`dmenu_path | dmenu` && eval \"exec $exe\"") -- %! Launch dmenu
, ((modMask .|. shiftMask, xK_p ), spawn "gmrun") -- %! Launch gmrun
, ((modMask .|. shiftMask, xK_c ), kill) -- %! Close the focused window
@@ -241,7 +241,7 @@ defaultConfig = XConfig { borderWidth = 1 -- Width of the window border in pixel
-- transformers, for example, would be hooked in here.
--
, layoutHook = layout
- , defaultTerminal = "xterm" -- The preferred terminal program.
+ , terminal = "xterm" -- The preferred terminal program.
, normalBorderColor = "#dddddd" -- Border color for unfocused windows.
, focusedBorderColor = "#ff0000" -- Border color for focused windows.
, XMonad.keys = Main.keys