From: kaoru <kaoru>
Date: Sun, 15 Oct 2000 11:03:54 +0000 (+0000)
Subject: Fix last change.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1dda963d6f7f0bde4c10cdc789f1c7bd52384b74;p=elisp%2Fwanderlust.git

Fix last change.
---

diff --git a/wl/wl-version.el b/wl/wl-version.el
index 41478a0..425cd07 100644
--- a/wl/wl-version.el
+++ b/wl/wl-version.el
@@ -102,7 +102,8 @@ Insert User-Agent field instead of X-Mailer field."
 			(concat " " (apel-version)))
 		    (file-error nil))
 		  " " (wl-extended-emacs-version3 "/" t))
-	(concat "User-Agent: " (product-string-verbose 'wl-version) " "
+	;; Don't use product-string-verbose for short User-Agent field.
+	(concat "User-Agent: " (product-string-1 'wl-version t) " "
 		(wl-extended-emacs-version3 "/" t))))))
 
 ;; from gnus