Function: gnus-emacs-version

gnus-emacs-version is a byte-compiled function defined in gnus-util.el.gz.

Signature

(gnus-emacs-version)

Documentation

Stringified Emacs version.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-util.el.gz
(defun gnus-emacs-version ()
  "Stringified Emacs version."
  (let* ((lst (if (listp gnus-user-agent)
		  gnus-user-agent
		'(gnus emacs type)))
	 (system-v (cond ((memq 'config lst)
			  system-configuration)
			 ((memq 'type lst)
			  (symbol-name system-type))
			 (t nil)))
	 ) ;; codename
    (cond
     ((not (memq 'emacs lst))
      nil)
     ((string-match "^[.0-9]*\\.[0-9]+$" emacs-version)
      (concat "Emacs/" emacs-version
	      (if system-v
		  (concat " (" system-v ")")
		"")))
     (t emacs-version))))