Fix X-Mailer: example.

diff --git a/doc/wl-ja.texi b/doc/wl-ja.texi
index 2bf4675..8a6596e 100644 (file)
--- a/doc/wl-ja.texi
+++ b/doc/wl-ja.texi
@@ -6149,8 +6149,7 @@ nil \e$B$N>l9g$OCe?.$N%A%'%C%/$r9T$J$$$^$;$s!#\e(B
 (setq wl-generate-mailer-string-func
       (function
        (lambda ()
-         (format "X-Mailer: %s/%s (%s)"
-                 wl-appname wl-version wl-codename))))
+         (format "X-Mailer: %s" (product-string-1 'wl-version)))))
 @end group
 @end lisp
 

diff --git a/doc/wl.texi b/doc/wl.texi
index 34a4736..37cdf24 100644 (file)
--- a/doc/wl.texi
+++ b/doc/wl.texi
@@ -6205,8 +6205,7 @@ The following is a example:
 (setq wl-generate-mailer-string-func
       (function
        (lambda ()
-         (format "X-Mailer: %s/%s (%s)"
-                 wl-appname wl-version wl-codename))))
+         (format "X-Mailer: %s" (product-string-1 'wl-version)))))
 @end group
 @end lisp