Mercurial > hg > xemacs-beta
diff lisp/gnus/gnus-int.el @ 30:ec9a17fef872 r19-15b98
Import from CVS: tag r19-15b98
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:52:29 +0200 |
parents | 0293115a14e9 |
children | e04119814345 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-int.el Mon Aug 13 08:51:58 2007 +0200 +++ b/lisp/gnus/gnus-int.el Mon Aug 13 08:52:29 2007 +0200 @@ -427,7 +427,7 @@ (let* ((elem (assoc method gnus-opened-servers)) (status (cadr elem))) ;; If this hasn't been opened before, we add it to the list. - (when (eq status 'denied) + (when (eq status 'denied) ;; Set the status of this server. (setcar (cdr elem) 'closed))))