diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,3 +1,7 @@
+## 0.4.13.1
+
+* Fix [#50](https://github.com/snoyberg/mime-mail/issues/50): space between name and address [#51](https://github.com/snoyberg/mime-mail/pull/51)
+
 ## 0.4.13
 
 * Sanitize headers to protect against email injection.
diff --git a/Network/Mail/Mime.hs b/Network/Mail/Mime.hs
--- a/Network/Mail/Mime.hs
+++ b/Network/Mail/Mime.hs
@@ -257,7 +257,7 @@
 -- Since 0.4.3
 showAddress :: Address -> Builder
 showAddress a = mconcat
-    [ maybe mempty ((fromByteString " " <>) . encodedWord) (addressName a)
+    [ maybe mempty ((<> fromByteString " ") . encodedWord) (addressName a)
     , fromByteString "<"
     , fromText (sanitizeHeader $ addressEmail a)
     , fromByteString ">"
diff --git a/mime-mail.cabal b/mime-mail.cabal
--- a/mime-mail.cabal
+++ b/mime-mail.cabal
@@ -1,5 +1,5 @@
 Name:                mime-mail
-Version:             0.4.13
+Version:             0.4.13.1
 Synopsis:            Compose MIME email messages.
 description:         Hackage documentation generation is not reliable. For up to date documentation, please see: <http://www.stackage.org/package/mime-mail>.
 Homepage:            http://github.com/snoyberg/mime-mail
diff --git a/test/Network/Mail/MimeSpec.hs b/test/Network/Mail/MimeSpec.hs
--- a/test/Network/Mail/MimeSpec.hs
+++ b/test/Network/Mail/MimeSpec.hs
@@ -56,6 +56,11 @@
                     then True
                     else error $ show $ lines' gen
 
+        it "issue #50" $
+            let addr = Address (Just "Name_ (is): @hi?") "user@domain.tld"
+                enc = "=?utf-8?Q?Name=5F_=28is=29=3A_=40hi=3F?= <user@domain.tld>"
+             in renderAddress addr `shouldBe` enc
+
 lines' :: L8.ByteString -> [L8.ByteString]
 lines' =
     map stripCR . L8.lines