Mercurial > hg > xemacs-beta

diff lisp/gnus/gnus-msg.el @ 157:6b37e6ddd302 r20-3b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b5
author cvs
date Mon, 13 Aug 2007 09:40:41 +0200
parents 1856695b1fa9
children 0132846995bd
line wrap: on
line diff
--- a/lisp/gnus/gnus-msg.el	Mon Aug 13 09:39:46 2007 +0200
+++ b/lisp/gnus/gnus-msg.el	Mon Aug 13 09:40:41 2007 +0200
@@ -537,7 +537,9 @@
 		 (substring emacs-version
 			    (match-beginning 3)
 			    (match-end 3))
-	       "")))
+	       "")
+	     (if (boundp 'xemacs-codename)
+		 (concat " - \"" xemacs-codename "\""))))
     (t emacs-version))))
 
 ;; Written by "Mr. Per Persson" <pp@gnu.ai.mit.edu>.