diff options
| author | Ben Boeckel <mathstuf@gmail.com> | 2012-03-11 13:55:34 -0400 |
|---|---|---|
| committer | Ben Boeckel <mathstuf@gmail.com> | 2012-03-11 13:55:34 -0400 |
| commit | fb1186dabda26a2eed55ec1e7bd2ff4b1a8f3e50 (patch) | |
| tree | d404db1e722cabd92ab74b2b75c5abc7f947d8e8 /src/Main.hs | |
| parent | c0e28d9812633ec1734cd3be9832456260f04ea6 (diff) | |
| download | xmobar-fb1186dabda26a2eed55ec1e7bd2ff4b1a8f3e50.tar.gz xmobar-fb1186dabda26a2eed55ec1e7bd2ff4b1a8f3e50.tar.bz2 | |
Add parentheses
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index 38975bc..4c3f351 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -172,6 +172,6 @@ doOpts conf (o:oo) = where readCom c str = case readStr str of [x] -> Right x - _ -> Left "xmobar: cannot read list of commands specified with the -" ++ c:" option\n" + _ -> Left ("xmobar: cannot read list of commands specified with the -" ++ c:" option\n") readStr str = [x | (x,t) <- reads str, ("","") <- lex t] |