Function: emacs-lock--kill-buffer-query-functions

emacs-lock--kill-buffer-query-functions is a byte-compiled function defined in emacs-lock.el.gz.

Signature

(emacs-lock--kill-buffer-query-functions)

Documentation

Display a message if the current buffer is kill-locked.

Return a value appropriate for kill-buffer-query-functions (which see).

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lock.el.gz
(defun emacs-lock--kill-buffer-query-functions ()
  "Display a message if the current buffer is kill-locked.
Return a value appropriate for `kill-buffer-query-functions' (which see)."
  (if (or (emacs-lock--can-auto-unlock 'kill)
          (memq emacs-lock-mode '(nil exit)))
      t
    (run-hook-with-args 'emacs-lock-locked-buffer-functions (current-buffer))
    (message "Buffer %S is locked and cannot be killed" (buffer-name))
    nil))