Function: gnus-server-opened

gnus-server-opened is a byte-compiled function defined in gnus-int.el.gz.

Signature

(gnus-server-opened COMMAND-METHOD)

Documentation

Check whether a connection to COMMAND-METHOD has been opened.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-int.el.gz
(defun gnus-server-opened (command-method)
  "Check whether a connection to COMMAND-METHOD has been opened."
  (unless (eq (gnus-server-status command-method)
	      'denied)
    (let ((gnus-command-method
           (if (stringp command-method)
               (gnus-server-to-method command-method)
             command-method)))
      (funcall (inline (gnus-get-function gnus-command-method 'server-opened))
               (nth 1 gnus-command-method)))))