Mercurial > hg > xemacs-beta

diff lisp/gnus/gnus-srvr.el @ 120:cca96a509cfe r20-1b12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b12
author cvs
date Mon, 13 Aug 2007 09:25:29 +0200
parents 9f59509498e1
children d2f30a177268
line wrap: on
line diff
--- a/lisp/gnus/gnus-srvr.el	Mon Aug 13 09:24:19 2007 +0200
+++ b/lisp/gnus/gnus-srvr.el	Mon Aug 13 09:25:29 2007 +0200
@@ -678,7 +678,10 @@
   (save-excursion
     (beginning-of-line)
     (when (re-search-forward ": \\(.*\\)$" (gnus-point-at-eol) t)
-      (gnus-group-prefixed-name (match-string 1) gnus-browse-current-method))))
+      (gnus-group-prefixed-name
+       ;; Remove text props.
+       (format "%s" (match-string 1))
+       gnus-browse-current-method))))
 
 (defun gnus-browse-unsubscribe-group ()
   "Toggle subscription of the current group in the browse buffer."