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

magit-blame-put-keymap-before-view-mode is a byte-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 ~/.emacs.d/elpa/magit-20260411.1452/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))