gnus-start.el (gnus-method-rank): Replace equalp with equal.

This commit is contained in:
Katsumi Yamaoka 2010-09-05 11:53:59 +00:00
parent 8737ef699d
commit 3cf628e8ec
2 changed files with 3 additions and 1 deletions

View file

@ -1,5 +1,7 @@
2010-09-05 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-start.el (gnus-method-rank): Replace equalp with equal.
* nnmh.el (nnmh-request-list-1): Bind `file'.
* pop3.el (pop3-set-process-query-on-exit-flag): New function that's an

View file

@ -1772,7 +1772,7 @@ If SCAN, request a scan of that group as well."
(let ((i 2))
(block nil
(dolist (smethod gnus-secondary-select-methods)
(when (equalp method smethod)
(when (equal method smethod)
(return i))
(incf i))
i)))