summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
authorBen Boeckel <mathstuf@gmail.com>2012-03-11 13:55:34 -0400
committerBen Boeckel <mathstuf@gmail.com>2012-03-11 13:55:34 -0400
commitfb1186dabda26a2eed55ec1e7bd2ff4b1a8f3e50 (patch)
treed404db1e722cabd92ab74b2b75c5abc7f947d8e8 /src
parentc0e28d9812633ec1734cd3be9832456260f04ea6 (diff)
downloadxmobar-fb1186dabda26a2eed55ec1e7bd2ff4b1a8f3e50.tar.gz
xmobar-fb1186dabda26a2eed55ec1e7bd2ff4b1a8f3e50.tar.bz2
Add parentheses
Diffstat (limited to 'src')
-rw-r--r--src/Main.hs2
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]