(message-make-user-agent): Fold more.

diff --git a/lisp/message.el b/lisp/message.el
index b4475e2..7d6ee5d 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3146,7 +3146,7 @@ give as trustworthy answer as possible."
            "")                         ; not Meadow
          )))
     (if message-user-agent
-       (concat message-user-agent " " user-agent)
+       (concat message-user-agent "\n " user-agent)
       user-agent)))
 
 (defun message-generate-headers (headers)