Function: gnus-category-make-function

gnus-category-make-function is a byte-compiled function defined in gnus-agent.el.gz.

Signature

(gnus-category-make-function PREDICATE)

Documentation

Make a function from PREDICATE.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-agent.el.gz
(defun gnus-category-make-function (predicate)
  "Make a function from PREDICATE."
  (let ((func (gnus-category-make-function-1 predicate)))
    (if (and (= (length func) 1)
	     (symbolp (car func)))
	(car func)
      (gnus-byte-compile `(lambda () ,func)))))