mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-08-03 21:51:52 -07:00
Added scratchpadSpawnActionTerminal to specify the terminal program directly as a String.
This commit is contained in:
@@ -36,6 +36,7 @@
|
|||||||
|
|
||||||
module XMonad.Util.Scratchpad (
|
module XMonad.Util.Scratchpad (
|
||||||
scratchpadSpawnAction
|
scratchpadSpawnAction
|
||||||
|
,scratchpadSpawnActionTerminal
|
||||||
,scratchpadManageHookDefault
|
,scratchpadManageHookDefault
|
||||||
,scratchpadManageHook
|
,scratchpadManageHook
|
||||||
) where
|
) where
|
||||||
@@ -53,6 +54,11 @@ scratchpadSpawnAction :: XConfig l -- ^ The configuration, to retrieve the termi
|
|||||||
scratchpadSpawnAction conf = spawn $ terminal conf ++ " -title scratchpad"
|
scratchpadSpawnAction conf = spawn $ terminal conf ++ " -title scratchpad"
|
||||||
|
|
||||||
|
|
||||||
|
-- | Action to pop up the terminal, with a directly specified terminal.
|
||||||
|
scratchpadSpawnActionTerminal :: String -- ^ Name of the terminal program
|
||||||
|
-> X ()
|
||||||
|
scratchpadSpawnActionTerminal term = spawn $ term ++ " -title scratchpad"
|
||||||
|
|
||||||
|
|
||||||
-- | The ManageHook, with the default rectangle:
|
-- | The ManageHook, with the default rectangle:
|
||||||
-- Half the screen wide, a quarter of the screen tall, centered.
|
-- Half the screen wide, a quarter of the screen tall, centered.
|
||||||
|
Reference in New Issue
Block a user