Mercurial > hg > xemacs-beta
diff lisp/gnus/nnoo.el @ 110:fe104dbd9147 r20-1b7
Import from CVS: tag r20-1b7
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:19:45 +0200 |
parents | 360340f9fd5f |
children | 15872534500d |
line wrap: on
line diff
--- a/lisp/gnus/nnoo.el Mon Aug 13 09:18:41 2007 +0200 +++ b/lisp/gnus/nnoo.el Mon Aug 13 09:19:45 2007 +0200 @@ -207,7 +207,7 @@ (pop defs)) (nconc bstate (list (cons current state)))))) -(defun nnoo-current-server-p (backend server) +(defsubst nnoo-current-server-p (backend server) (equal (nnoo-current-server backend) server)) (defun nnoo-current-server (backend)