@@ -606,8 +606,8 @@ langAttr = do
606606
607607-- | Parses material surrounded by a parser.
608608surrounded :: Parser [Char] st t -- ^ surrounding parser
609− -> Parser [Char] st a -- ^ content parser (to be used repeatedly)
610− -> Parser [Char] st [a]
609+ -> Parser [Char] st a -- ^ content parser (to be used repeatedly)
610+ -> Parser [Char] st [a]
611611surrounded border =
612612 enclosed (border *> notFollowedBy (oneOf " \t\n\r")) (try border)
613613