Function: nnmairix-get-server

nnmairix-get-server is a byte-compiled function defined in nnmairix.el.gz.

Signature

(nnmairix-get-server)

Documentation

If there exists just one nnmairix server, return its value.

Otherwise, ask user for server.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnmairix.el.gz
(defun nnmairix-get-server ()
  "If there exists just one nnmairix server, return its value.
Otherwise, ask user for server."
  (let ((openedserver (nnmairix-get-nnmairix-servers)))
    (when (not openedserver)
      (error "No opened nnmairix server found"))
    (if (> (length openedserver) 1)
	(progn
	  (while
	      (equal '("")
		  (setq nnmairix-last-server
			(list (gnus-completing-read "Server" openedserver t
					       (or nnmairix-last-server
						   "nnmairix:"))))))
	  nnmairix-last-server)
      (car openedserver))))