summaryrefslogtreecommitdiffhomepage
path: root/src/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Main.hs')
-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]