Function: magit-blame-put-keymap-before-view-mode

magit-blame-put-keymap-before-view-mode is a natively compiled function defined in magit-blame.el.

Signature

(magit-blame-put-keymap-before-view-mode)

Documentation

Put magit-blame-read-only-mode(var)/magit-blame-read-only-mode(fun) ahead of view-mode(var)/view-mode(fun) in minor-mode-map-alist.

Source Code

;; Defined in /nix/store/irvbdy0zra0dn8fpd008f32x5ix6qm5v-emacs-packages-deps/share/emacs/site-lisp/elpa/magit-20261005.508/magit-blame.el
;;;; Kludges

(defun magit-blame-put-keymap-before-view-mode ()
  "Put `magit-blame-read-only-mode' ahead of `view-mode' in `minor-mode-map-alist'."
  (when-let ((entry (assq 'magit-blame-read-only-mode
                          (cl-member 'view-mode minor-mode-map-alist
                                     :key #'car))))
    (setq minor-mode-map-alist
          (cons entry
                (delq entry minor-mode-map-alist))))
  (remove-hook 'view-mode-hook #'magit-blame-put-keymap-before-view-mode))