On Thu, Jul 19, 2012 at 03:34:47PM +0200, Simon Hengel wrote: > openTag :: Parser String > openTag = char '<' *> many (noneOf ">") <* char '>' > > endTag :: String -> Parser String > endTag str = string "</" *> string str <* char '>' Well yes, modified to what Christian Maeder just suggested. Cheers, Simon