diff options
Diffstat (limited to '')
| -rw-r--r-- | XMonadPrompt.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/XMonadPrompt.hs b/XMonadPrompt.hs index f2a7019..52a9f6d 100644 --- a/XMonadPrompt.hs +++ b/XMonadPrompt.hs @@ -15,7 +15,8 @@ module XMonadContrib.XMonadPrompt ( -- * Usage -- $usage - xmonadPrompt + xmonadPrompt, + xmonadPromptC ) where import XMonad @@ -45,3 +46,7 @@ instance XPrompt XMonad where xmonadPrompt :: XPConfig -> X () xmonadPrompt c = mkXPrompt XMonad c (mkComplFunFromList (map fst defaultCommands)) runCommand' + +-- xmonad prompt with custom command list +xmonadPromptC :: [(String, X ())] -> XPConfig -> X () +xmonadPromptC commands c = mkXPrompt XMonad c (mkComplFunFromList (map fst commands)) runCommand' |