@@ -455,6 +455,7 @@ inlineCommands = M.fromList $
455 , ("footnote", (note . mconcat) <$> (char '{' *> manyTill block (char '}')))
455 , ("footnote", (note . mconcat) <$> (char '{' *> manyTill block (char '}')))
456 , ("verb", doverb)
456 , ("verb", doverb)
457 , ("lstinline", doverb)
457 , ("lstinline", doverb)
458 , ("texttt", (code . stringify . toList) <$> tok)
459 , ("texttt", (code . stringify . toList) <$> tok)
459 , ("url", (unescapeURL <$> braced) >>= \url ->
460 , ("url", (unescapeURL <$> braced) >>= \url ->
460 pure (link url "" (str url)))
461 pure (link url "" (str url)))