Function: diff-hl-set-reference-rev-in-project-internal

diff-hl-set-reference-rev-in-project-internal is a natively compiled function defined in diff-hl.el.

Signature

(diff-hl-set-reference-rev-in-project-internal REV PROJ)

Source Code

;; Defined in /nix/store/cfz56rl3lp066226i0bmmgiicls3gcq7-emacs-packages-deps/share/emacs/site-lisp/elpa/diff-hl-20261001.135/diff-hl.el
(defun diff-hl-set-reference-rev-in-project-internal (rev proj)
  (let* ((root (diff-hl--project-root proj)))
    ;; newly opened files will share this value
    (setf (alist-get root diff-hl-reference-revision-projects-cache
                     nil nil #'string-equal)
          rev)
    ;; update currently open files
    (dolist (buf (project-buffers proj))
      (with-current-buffer buf
        (when diff-hl-mode
          (when (bound-and-true-p diff-hl-amend-mode)
            (diff-hl-amend-mode -1))
          (setq-local diff-hl-reference-revision rev)
          (diff-hl-update))))))