XMonadPrompt: use a single blank

This commit is contained in:
Andrea Rossato
2007-10-29 09:16:18 +00:00
parent 323040000f
commit 0b444e5264

View File

@@ -42,7 +42,7 @@ import XMonadContrib.Commands (defaultCommands, runCommand')
data XMonad = XMonad
instance XPrompt XMonad where
showXPrompt XMonad = "XMonad: "
showXPrompt XMonad = "XMonad: "
xmonadPrompt :: XPConfig -> X ()
xmonadPrompt c = mkXPrompt XMonad c (mkComplFunFromList (map fst defaultCommands)) runCommand'