summaryrefslogtreecommitdiffhomepage
path: root/src/Environment.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2016-07-28 00:55:52 +0200
committerjao <jao@gnu.org>2016-07-28 00:55:52 +0200
commit8251b2f70ebcc044f57b45fa4764ffc34f80ec5f (patch)
tree2905e29ab9f54e6a14cd9f0233f96d28f8fc374a /src/Environment.hs
parent522c5cf0cc14dea251186d506cb361fda2812027 (diff)
downloadxmobar-8251b2f70ebcc044f57b45fa4764ffc34f80ec5f.tar.gz
xmobar-8251b2f70ebcc044f57b45fa4764ffc34f80ec5f.tar.bz2
Trivial compiler warning0.24.1
Diffstat (limited to 'src/Environment.hs')
-rw-r--r--src/Environment.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Environment.hs b/src/Environment.hs
index 8fbb35f..120dac6 100644
--- a/src/Environment.hs
+++ b/src/Environment.hs
@@ -37,7 +37,7 @@ expandEnv (c:s) = case c of
False -> do
remainder <- expandEnv $ drop 1 s
return $ escString s ++ remainder
- where escString s' = let (cc:ss) = s' in
+ where escString s' = let (cc:_) = s' in
case cc of
't' -> "\t"
'n' -> "\n"