Function: eglot--add-one-shot-hook

eglot--add-one-shot-hook is a byte-compiled function defined in eglot.el.gz.

Signature

(eglot--add-one-shot-hook HOOK FUNCTION &optional APPEND LOCAL)

Documentation

Like add-hook but calls FUNCTION only once.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/eglot.el.gz
(defun eglot--add-one-shot-hook (hook function &optional append local)
  "Like `add-hook' but calls FUNCTION only once."
  (let* ((fname (make-symbol (format "eglot--%s-once" function)))
         (fun (lambda (&rest args)
                (remove-hook hook fname local)
                (apply function args))))
    (fset fname fun)
    (add-hook hook fname append local)))