diff --git a/src/MdToHTML.hs b/src/MdToHTML.hs
index b65444e..5b5deb5 100644
--- a/src/MdToHTML.hs
+++ b/src/MdToHTML.hs
@@ -83,6 +83,8 @@ lookaheadParse stringCmp = do
 lineToList :: MdToken -> [MdToken]
 lineToList (Line tokens) = tokens
 
+specialChars = "\\#*_[\n "
+
 -- ---------------
 
 -- Parse a markdown header, denoted by 1-6 #'s followed by some text, followed by EOL.
@@ -138,7 +140,7 @@ parseSingleNewline = do
 parseString :: ReadP MdToken
 parseString = do
   firstChar <- satisfy (/= '\n') -- Must parse at least one non-newline character here
-  text <- munch (`notElem` "#*_[\n ")
+  text <- munch (`notElem` specialChars)
   return (Unit (firstChar : text))
 
 lineParsers :: [ReadP MdToken]