Fix tiny markup typo

This commit is contained in:
Ingo Blechschmidt
2015-12-14 16:24:16 +01:00
parent b9b4f4af07
commit fa3e774a65

View File

@@ -49,12 +49,12 @@ import XMonad.Prompt
-- @fireEmployee@ action, like so:
--
-- > firingPrompt :: X ()
-- > firingPrompt = inputPrompt defaultXPConfig \"Fire\" ?+ fireEmployee
-- > firingPrompt = inputPrompt defaultXPConfig "Fire" ?+ fireEmployee
--
-- If @employees@ contains a list of all his employees, he could also
-- create an autocompleting version, like this:
--
-- > firingPrompt' = inputPromptWithCompl defaultXPConfig \"Fire\"
-- > firingPrompt' = inputPromptWithCompl defaultXPConfig "Fire"
-- > (mkComplFunFromList employees) ?+ fireEmployee
--
-- Now all he has to do is add a keybinding to @firingPrompt@ (or
@@ -112,4 +112,4 @@ infixr 1 ?+
-- with input prompts. If you find a more general use for it and
-- want to move it to a different module, be my guest.
(?+) :: (Monad m) => m (Maybe a) -> (a -> m ()) -> m ()
x ?+ k = x >>= maybe (return ()) k
x ?+ k = x >>= maybe (return ()) k