@@ -253,7 +253,7 @@ parseAttr = try $ do
253 k <- many1 letter
253 k <- many1 letter
255 v <- (char '"' >> many1Till (satisfy (/='\n')) (char '"'))
255 v <- (char '"' >> many1Till (satisfy (/='\n')) (char '"'))
256− <|> many1 nonspaceChar
256+ <|> many1 (satisfy $ \c -> not (isSpace c) && c /= '|')
257 return (k,v)
257 return (k,v)
259tableStart :: MWParser ()
259tableStart :: MWParser ()