From 5b6e5ef78c4114dcf4c4c289ed32795aa2efdb67 Mon Sep 17 00:00:00 2001
From: gwern0 <gwern0@gmail.com>
Date: Wed, 8 Oct 2008 22:46:49 +0200
Subject: Prompt.hs: tweak haddocks

darcs-hash:20081008204649-f7719-c1be489cf582cbf18e4230633f89791b44f13396.gz
---
 XMonad/Prompt.hs | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs
index 76d6c22..8244e85 100644
--- a/XMonad/Prompt.hs
+++ b/XMonad/Prompt.hs
@@ -91,7 +91,7 @@ data XPState =
         , complWin           :: Maybe Window
         , complWinDim        :: Maybe ComplWindowDim
         , completionFunction :: String -> IO [String]
-	, showComplWin	     :: Bool
+        , showComplWin       :: Bool
         , gcon               :: !GC
         , fontS              :: !XMonadFont
         , xptype             :: !XPType
@@ -117,7 +117,7 @@ data XPConfig =
                                           -- history entries to remember
         , defaultText       :: String     -- ^ The text by default in the prompt line
         , autoComplete      :: Maybe Int  -- ^ Just x: if only one completion remains, auto-select it,
-	, showCompletionOnTab :: Bool     -- ^ Only show list of completions when Tab was pressed
+        , showCompletionOnTab :: Bool     -- ^ Only show list of completions when Tab was pressed
                                           --   and delay by x microseconds
         }
 
@@ -189,7 +189,7 @@ defaultXPConfig =
         , historyFilter     = id
         , defaultText       = []
         , autoComplete      = Nothing
-	, showCompletionOnTab = False
+        , showCompletionOnTab = False
         }
 
 type ComplFunction = String -> IO [String]
@@ -204,7 +204,7 @@ initState d rw w s compl gc fonts pt h c =
         , complWin           = Nothing
         , complWinDim        = Nothing
         , completionFunction = compl
-	, showComplWin       = not (showCompletionOnTab c)
+        , showComplWin       = not (showCompletionOnTab c)
         , gcon               = gc
         , fontS              = fonts
         , xptype             = XPT pt
@@ -808,8 +808,8 @@ breakAtSpace s
             (s1',s2') = breakAtSpace $ tail s2
 
 -- | 'historyCompletion' provides a canned completion function much like
---   getShellCompl; you pass it to mkXPrompt, and it will make completions work
---   from the query history stored in ~/.xmonad/history.
+--   'getShellCompl'; you pass it to mkXPrompt, and it will make completions work
+--   from the query history stored in ~\/.xmonad\/history.
 historyCompletion :: ComplFunction
 historyCompletion x = fmap (filter (isInfixOf x) . Map.fold (++) []) readHistory
 
@@ -820,7 +820,7 @@ uniqSort = toList . fromList
 
 -- | Functions to be used with the 'historyFilter' setting.
 -- 'deleteAllDuplicates' will remove all duplicate entries.
--- 'deleteConsecutiveDuplicates' will remove duplicate elements which are
+-- 'deleteConsecutiveDuplicates' will only remove duplicate elements
 -- immediately next to each other.
 deleteAllDuplicates, deleteConsecutiveDuplicates :: [String] -> [String]
 deleteAllDuplicates = nub
-- 
cgit v1.2.3