eWord :: Parser String
parseWord = parseLexeme $ do
  _ <- char '<'
  word <- some (alphaNumChar <|> char '-')
  _ <- char '>'
  return word

pa
parseWord :: Parser String
parseWord = parseLexeme $ do
  _ <- char '<'
  word <- some (alphaNumChar <|> char '-')
  _ <- char '>'
  return word
parseWord = parseLexeme $ do
  _ <- char '<'
  word <- some (alphaNumChar <|> char '-')
  _ <- char '>'
  return word