diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-24 12:53:54 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-24 12:53:54 +0200 |
| commit | 1b9d177ae382f6803bcfa409efd7b853265a2300 (patch) | |
| tree | 67dade488e52825bd351878ecb71d22e9e9483ad | |
| parent | 540415e9a0c6e1226ed5b7550bfef8264ffb93c8 (diff) | |
| download | metatile-1b9d177ae382f6803bcfa409efd7b853265a2300.tar metatile-1b9d177ae382f6803bcfa409efd7b853265a2300.zip | |
Add Config.terminal
darcs-hash:20071024105354-a5988-089d5615bc05c007d6713eaeaa1fe19af02a4e7d
| -rw-r--r-- | Config.hs | 7 | ||||
| -rw-r--r-- | Config.hs-boot | 1 |
2 files changed, 7 insertions, 1 deletions
@@ -178,6 +178,11 @@ logHook = return () ------------------------------------------------------------------------ -- Key bindings: +-- | The preferred terminal program, which is used in a binding below and by +-- certain contrib modules. +terminal :: String +terminal = "xterm" + -- | The xmonad key bindings. Add, modify or remove key bindings here. -- -- (The comment formatting character is used when generating the manpage) @@ -185,7 +190,7 @@ logHook = return () keys :: M.Map (KeyMask, KeySym) (X ()) keys = M.fromList $ -- launching and killing programs - [ ((modMask .|. shiftMask, xK_Return), spawn "xterm") -- %! Launch an xterm + [ ((modMask .|. shiftMask, xK_Return), spawn terminal) -- %! 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 diff --git a/Config.hs-boot b/Config.hs-boot index 6d631c5..00d45a7 100644 --- a/Config.hs-boot +++ b/Config.hs-boot @@ -8,3 +8,4 @@ workspaces :: [WorkspaceId] logHook :: X () manageHook :: Window -> String -> String -> String -> X (WindowSet -> WindowSet) serialisedLayouts :: [Layout Window] +terminal :: String |