Function: gnus-getenv-nntpserver

gnus-getenv-nntpserver is a byte-compiled function defined in gnus.el.gz.

Signature

(gnus-getenv-nntpserver)

Documentation

Find default nntp server.

Check the NNTPSERVER environment variable and the gnus-nntpserver-file file.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus.el.gz
(defun gnus-getenv-nntpserver ()
  "Find default nntp server.
Check the NNTPSERVER environment variable and the
`gnus-nntpserver-file' file."
  (or (getenv "NNTPSERVER")
      (and (file-readable-p gnus-nntpserver-file)
	   (with-temp-buffer
	     (insert-file-contents gnus-nntpserver-file)
	     (when (re-search-forward "[^ \t\n\r]+" nil t)
	       (match-string 0))))))