summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2019-06-30 18:26:11 +0100
committerjao <jao@gnu.org>2019-06-30 18:26:11 +0100
commit0657350fe6948954ff6c2aa2593eedc7cf11d4a0 (patch)
treec04973a8328f120e7c0c4711924fabc31a1fecef /src/Xmobar
parent615843d0b624aaab36c318a8daa2062e4e7f5a59 (diff)
downloadxmobar-0657350fe6948954ff6c2aa2593eedc7cf11d4a0.tar.gz
xmobar-0657350fe6948954ff6c2aa2593eedc7cf11d4a0.tar.bz2
Eye candy
Diffstat (limited to 'src/Xmobar')
-rw-r--r--src/Xmobar/X11/Parsers.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/X11/Parsers.hs b/src/Xmobar/X11/Parsers.hs
index 258964a..7fa42d7 100644
--- a/src/Xmobar/X11/Parsers.hs
+++ b/src/Xmobar/X11/Parsers.hs
@@ -55,7 +55,7 @@ stringParser :: String -> FontIndex -> Maybe [Action]
-> Parser [[(Widget, ColorString, FontIndex, Maybe [Action])]]
stringParser c f a = manyTill (allParsers c f a) eof
--- | Parses a maximal string without color markup.
+-- | Parses a maximal string without markup.
textParser :: String -> FontIndex -> Maybe [Action]
-> Parser [(Widget, ColorString, FontIndex, Maybe [Action])]
textParser c f a = do s <- many1 $