Function: hypb:supercite-p

hypb:supercite-p is a byte-compiled function defined in hypb.el.

Signature

(hypb:supercite-p)

Documentation

Return non-nil iff the Emacs add-on supercite package is in use.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hypb.el
(defun hypb:supercite-p ()
  "Return non-nil iff the Emacs add-on supercite package is in use."
  (let (hook-val)
    (when (memq t (mapcar
		   (lambda (hook-var)
		     (and (boundp hook-var)
			  (progn (setq hook-val (symbol-value hook-var))
                                 (cond ((listp hook-val)
                                        (when (memq 'sc-cite-original hook-val)
					  t))
				       ((eq hook-val 'sc-cite-original))))))
		   '(mail-citation-hook mail-yank-hooks)))
      t)))