X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-sum.el;fp=lisp%2Fgnus-sum.el;h=3537c3f5ed0f47136a94dd624a2aaf0fe72aa656;hb=82ff3c3828b5387582590779f3c5530c773aa158;hp=a5cafed110e81b6fb5c41e65488dc3217c60e762;hpb=57d68edefa2cd78977b0e5c5042cde16964b70f3;p=elisp%2Fgnus.git-

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index a5cafed..3537c3f 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -2979,8 +2979,9 @@ buffer that was in action when the last article was fetched."
       (setq gnus-tmp-name gnus-tmp-from))
     (unless (numberp gnus-tmp-lines)
       (setq gnus-tmp-lines -1))
-    (when (= gnus-tmp-lines -1)
-      (setq gnus-tmp-lines "?"))
+    (if (= gnus-tmp-lines -1)
+	(setq gnus-tmp-lines "?")
+      (setq gnus-tmp-lines (number-to-string gnus-tmp-lines)))
     (gnus-put-text-property-excluding-characters-with-faces
      (point)
      (progn (eval gnus-summary-line-format-spec) (point))
@@ -4411,8 +4412,9 @@ or a straight list of headers."
 	      (setq gnus-tmp-name gnus-tmp-from))
 	    (unless (numberp gnus-tmp-lines)
 	      (setq gnus-tmp-lines -1))
-	    (when (= gnus-tmp-lines -1)
-	      (setq gnus-tmp-lines "?"))
+	    (if (= gnus-tmp-lines -1)
+		(setq gnus-tmp-lines "?")
+	      (setq gnus-tmp-lines (number-to-string gnus-tmp-lines)))
 	    (gnus-put-text-property
 	     (point)
 	     (progn (eval gnus-summary-line-format-spec) (point))