summaryrefslogtreecommitdiffhomepage
path: root/Parsers.hs
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@ing.unitn.it>2010-02-09 10:45:48 +0100
committerAndrea Rossato <andrea.rossato@ing.unitn.it>2010-02-09 10:45:48 +0100
commit16825154a662343abd434ea64c064aac0813a199 (patch)
tree5b09ab4fd6c8b2b38def35cbcfcf7dc75412a6e2 /Parsers.hs
parent23ac09baddf9727179422dc53f3068676e1798f4 (diff)
downloadxmobar-16825154a662343abd434ea64c064aac0813a199.tar.gz
xmobar-16825154a662343abd434ea64c064aac0813a199.tar.bz2
update my email
Ignore-this: afbb205e54c523b9f091d4495f9ba176dd3db971 darcs-hash:20100209094548-d6583-024d9319483e56a4482ce5fb705951097c33ec83.gz
Diffstat (limited to 'Parsers.hs')
-rw-r--r--Parsers.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Parsers.hs b/Parsers.hs
index 48c5748..78b4f3e 100644
--- a/Parsers.hs
+++ b/Parsers.hs
@@ -5,7 +5,7 @@
-- Copyright : (c) Andrea Rossato
-- License : BSD-style (see LICENSE)
--
--- Maintainer : Andrea Rossato <andrea.rossato@unibz.it>
+-- Maintainer : Andrea Rossato <andrea.rossato@unitn.it>
-- Stability : unstable
-- Portability : unportable
--
@@ -93,8 +93,8 @@ parseTemplate c s =
m = Map.fromList $ zip cl (commands c)
return $ combine c m str
--- | Given a finite "Map" and a parsed templatet produces the
--- | resulting output string.
+-- | Given a finite "Map" and a parsed template produce the resulting
+-- output string.
combine :: Config -> Map.Map String Runnable -> [(String, String, String)] -> [(Runnable,String,String)]
combine _ _ [] = []
combine c m ((ts,s,ss):xs) = (com, s, ss) : combine c m xs