summaryrefslogtreecommitdiffhomepage
path: root/Parsers.hs
diff options
context:
space:
mode:
authornzeh <nzeh@cs.dal.ca>2009-03-24 01:19:30 +0100
committernzeh <nzeh@cs.dal.ca>2009-03-24 01:19:30 +0100
commit062b6e457f7e90389a18aef234c3b49373b7eb76 (patch)
treec4c2ab9dd4198725b6c76842b8deed6c305f8b11 /Parsers.hs
parent1bd14813d4210104c44a3925d4e1f585ba1c3303 (diff)
downloadxmobar-062b6e457f7e90389a18aef234c3b49373b7eb76.tar.gz
xmobar-062b6e457f7e90389a18aef234c3b49373b7eb76.tar.bz2
Drop Parsers.endOfLine and Parsers.tryString
These were wrappers around eof and (try . string) and are no longer used. darcs-hash:20090324001930-c6b6b-c476cd602fd818bc4a9b5ee3d9d988eba8a3f7bc.gz
Diffstat (limited to 'Parsers.hs')
-rw-r--r--Parsers.hs6
1 files changed, 0 insertions, 6 deletions
diff --git a/Parsers.hs b/Parsers.hs
index e09c4bf..8792a69 100644
--- a/Parsers.hs
+++ b/Parsers.hs
@@ -97,11 +97,5 @@ combine c m ((ts,s,ss):xs) = (com, s, ss) : combine c m xs
where com = Map.findWithDefault dflt ts m
dflt = Run $ Com ts [] [] 10
-endOfLine :: a -> Parser a
-endOfLine r = eof >> return r
-
-tryString :: String -> Parser String
-tryString = try . string
-
allTillSep :: Config -> Parser String
allTillSep = many . noneOf . sepChar