gnus-int.el (gnus-open-server): Silence compiler

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a993127..9aea114 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-09-17  Katsumi Yamaoka  <yamaoka@jpl.org>
 
+       * gnus-int.el (gnus-open-server): Silence compiler.
+
        * mm-decode.el (mm-add-meta-html-tag): Fix regexp matching meta tag.
 
        * message.el (message-display-completion-list): Abolish.

diff --git a/lisp/gnus-int.el b/lisp/gnus-int.el
index f0cf0da..2de6ce0 100644 (file)
--- a/lisp/gnus-int.el
+++ b/lisp/gnus-int.el
@@ -302,7 +302,7 @@ If it is down, start it up (again)."
         (setcar
         (cdr elem)
         (cond (result
-               (if (eq open-server-function #'nnagent-open-server)
+               (if (eq open-server-function 'nnagent-open-server)
                    ;; The agent's backend has a "special" status
                    'offline
                  'ok))