diff options
author | Braden Shepherdson <Braden.Shepherdson@gmail.com> | 2008-06-08 20:07:48 +0200 |
---|---|---|
committer | Braden Shepherdson <Braden.Shepherdson@gmail.com> | 2008-06-08 20:07:48 +0200 |
commit | 3b53fa461b0fde90e7a79048bc9f4312f18c3aa6 (patch) | |
tree | a2c98a26ae1ecf3fc5bfbdbee18d31f6a10f394d /XMonad/Util | |
parent | 63655b76589e520fdf226257c8e8c02e3d3da1cf (diff) | |
download | XMonadContrib-3b53fa461b0fde90e7a79048bc9f4312f18c3aa6.tar.gz XMonadContrib-3b53fa461b0fde90e7a79048bc9f4312f18c3aa6.tar.xz XMonadContrib-3b53fa461b0fde90e7a79048bc9f4312f18c3aa6.zip |
Now using -name instead of -title as the term app argument, and correspondingly resource for the ManageHook.
darcs-hash:20080608180748-d53a8-bea50d6f478dc346a5dabbbc5fee0a54d215c9e1.gz
Diffstat (limited to 'XMonad/Util')
-rw-r--r-- | XMonad/Util/Scratchpad.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/XMonad/Util/Scratchpad.hs b/XMonad/Util/Scratchpad.hs index 65da63d..2f29dc4 100644 --- a/XMonad/Util/Scratchpad.hs +++ b/XMonad/Util/Scratchpad.hs @@ -50,7 +50,7 @@ import qualified XMonad.StackSet as W -- quarter-screen-tall window. -- The key, position and size are configurable. -- --- The terminal application must support the @-title@ argument. +-- The terminal application must support the @-name@ argument. -- Known supported terminals: rxvt, rxvt-unicode, xterm. -- Most others are likely to follow the lead set by xterm. -- @@ -71,14 +71,14 @@ import qualified XMonad.StackSet as W scratchpadSpawnAction :: XConfig l -- ^ The configuration, to retrieve the terminal -> X () scratchpadSpawnAction conf = - scratchpadAction $ spawn $ terminal conf ++ " -title scratchpad" + scratchpadAction $ spawn $ terminal conf ++ " -name scratchpad" -- | Action to pop up the terminal, with a directly specified terminal. scratchpadSpawnActionTerminal :: String -- ^ Name of the terminal program -> X () scratchpadSpawnActionTerminal term = - scratchpadAction $ spawn $ term ++ " -title scratchpad" + scratchpadAction $ spawn $ term ++ " -name scratchpad" @@ -114,7 +114,7 @@ scratchpadWorkspaceTag = "SP" -- factored out since this is common to both the ManageHook and the action scratchpadQuery :: Query Bool -scratchpadQuery = title =? "scratchpad" +scratchpadQuery = resource =? "scratchpad" -- | The ManageHook, with the default rectangle: |