diff options
| author | jao <jao@gnu.org> | 2018-11-25 05:31:54 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2018-11-25 05:31:54 +0000 |
| commit | 3cf0041960837701c325b698460678aea1c449b4 (patch) | |
| tree | d95368f494cce15fc448507cefd52918825ff1a5 /src/lib/Xmobar/Parsers.hs | |
| parent | cce2298c43759ee4aa314f07e5f6e8a71a38bf64 (diff) | |
| download | xmobar-3cf0041960837701c325b698460678aea1c449b4.tar.gz xmobar-3cf0041960837701c325b698460678aea1c449b4.tar.bz2 | |
Exporting Exec constructors from Xmobar
Diffstat (limited to 'src/lib/Xmobar/Parsers.hs')
| -rw-r--r-- | src/lib/Xmobar/Parsers.hs | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/src/lib/Xmobar/Parsers.hs b/src/lib/Xmobar/Parsers.hs index b7e4dbd..d8bd409 100644 --- a/src/lib/Xmobar/Parsers.hs +++ b/src/lib/Xmobar/Parsers.hs @@ -50,13 +50,12 @@ allParsers :: ColorString -> FontIndex -> Maybe [Action] -> Parser [(Widget, ColorString, FontIndex, Maybe [Action])] -allParsers c f a = - textParser c f a - <|> try (iconParser c f a) - <|> try (rawParser c f a) - <|> try (actionParser c f a) - <|> try (fontParser c a) - <|> colorParser f a +allParsers c f a = textParser c f a + <|> try (iconParser c f a) + <|> try (rawParser c f a) + <|> try (actionParser c f a) + <|> try (fontParser c a) + <|> colorParser f a -- | Gets the string and combines the needed parsers stringParser :: String -> FontIndex -> Maybe [Action] |