diff lisp/gnus/gnus-sum.el @ 111792:6125476aab24

gnus-util.el (gnus-macroexpand-all): New function. gnus-sum.el (gnus-summary-line-format-alist): Use gnus-macroexpand-all instead of macroexpand-all that is unavailable in XEmacs.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Fri, 03 Dec 2010 02:17:23 +0000
parents f97704487fb3
children 5e488dbb17f7
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el	Fri Dec 03 10:52:43 2010 +0900
+++ b/lisp/gnus/gnus-sum.el	Fri Dec 03 02:17:23 2010 +0000
@@ -1361,13 +1361,13 @@
     (?c (or (mail-header-chars gnus-tmp-header) 0) ?d)
     (?k (gnus-summary-line-message-size gnus-tmp-header) ?s)
     (?L gnus-tmp-lines ?s)
-    (?Z (or ,(macroexpand-all
+    (?Z (or ,(gnus-macroexpand-all
 	      '(nnir-article-rsv (mail-header-number gnus-tmp-header)))
 	    0) ?d)
-    (?G (or ,(macroexpand-all
+    (?G (or ,(gnus-macroexpand-all
 	      '(nnir-article-group (mail-header-number gnus-tmp-header)))
 	    "") ?s)
-    (?g (or ,(macroexpand-all
+    (?g (or ,(gnus-macroexpand-all
 	      '(gnus-group-short-name
 		(nnir-article-group (mail-header-number gnus-tmp-header))))
 	    "") ?s)