diff --git a/Text/Markdown/Block.hs b/Text/Markdown/Block.hs
--- a/Text/Markdown/Block.hs
+++ b/Text/Markdown/Block.hs
@@ -252,7 +252,7 @@
         Just t' ->
             let (name, rest)
                     | Just _ <- T.stripPrefix "!--" t' = ("--", t')
-                    | otherwise = T.break (\c -> c `elem` " >") t'
+                    | otherwise = T.break (\c -> c == ' ' || c == '>') t'
              in (T.all isValidTagName name &&
                 not (T.null name) &&
                 (not ("/" `T.isPrefixOf` rest) || ("/>" `T.isPrefixOf` rest)))
diff --git a/Text/Markdown/Inline.hs b/Text/Markdown/Inline.hs
--- a/Text/Markdown/Inline.hs
+++ b/Text/Markdown/Inline.hs
@@ -94,7 +94,8 @@
     footnoteRef = InlineFootnoteRef <$> (char '{' *> decimal <* char '}')
     footnote = InlineFootnote <$> (string "{^" *> decimal <* char '}')
 
-    escape = InlineText . T.singleton <$> (char '\\' *> satisfy (`elem` "\\`*_{}[]()#+-.!>"))
+    escape = InlineText . T.singleton <$>
+        (char '\\' *> satisfy (`elem` ("\\`*_{}[]()#+-.!>" :: String)))
 
     takeBalancedBrackets =
         T.pack <$> go (0 :: Int)
diff --git a/markdown.cabal b/markdown.cabal
--- a/markdown.cabal
+++ b/markdown.cabal
@@ -1,5 +1,5 @@
 Name:                markdown
-Version:             0.1.13
+Version:             0.1.13.1
 Synopsis:            Convert Markdown to HTML, with XSS protection
 Description:         This library leverages existing high-performance libraries (attoparsec, blaze-html, text, and conduit), and should integrate well with existing codebases.
 Homepage:            https://github.com/snoyberg/markdown