diff --git a/src/Web/Tweet/Parser.hs b/src/Web/Tweet/Parser.hs
--- a/src/Web/Tweet/Parser.hs
+++ b/src/Web/Tweet/Parser.hs
@@ -102,7 +102,7 @@
     string "\\ud"
     str1 <- count 3 anyChar
     str2 <- string "\\ud" >> count 3 anyChar
-    let num = TE.decodeUtf16BE . BSW.pack $ "d" <> str1 <> "d" <> str2
+    let num = decodeUtf16 $ "d" <> str1 <> "d" <> str2
     pure . T.head $ num
 
 decodeUtf16 = TE.decodeUtf16BE . BS.concat . go
@@ -128,7 +128,7 @@
 -- | Parse escaped characters
 specialChar :: Char -> Parser Char
 specialChar c = do
-    string $ (c:"\\")
+    string $ "\\" <> pure c
     pure c
 
 -- | Convert a string of four hexadecimal digits to an integer.
diff --git a/tweet-hs.cabal b/tweet-hs.cabal
--- a/tweet-hs.cabal
+++ b/tweet-hs.cabal
@@ -1,5 +1,5 @@
 name:                tweet-hs
-version:             1.0.1.0
+version:             1.0.1.1
 synopsis:            Command-line tool for twitter
 description:         a Command Line Interface Tweeter
 homepage:            https://github.com/vmchale/command-line-tweeter#readme