We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 685ea2d + aea5557 commit 845c492Copy full SHA for 845c492
1 file changed
diff-hl.el
@@ -740,9 +740,13 @@ Return a list of line overlays used."
740
(defun diff-hl--resolve (value-or-buffer cb)
741
(if (listp value-or-buffer)
742
(funcall cb value-or-buffer)
743
- (diff-hl--when-done value-or-buffer
744
- #'diff-hl-changes-from-buffer
745
- cb)))
+ (static-if (>= emacs-major-version 31)
+ (with-current-buffer value-or-buffer
+ (vc-run-delayed-success 1
746
+ (funcall cb (diff-hl-changes-from-buffer (current-buffer)))))
747
+ (diff-hl--when-done value-or-buffer
748
+ #'diff-hl-changes-from-buffer
749
+ cb))))
750
751
(defun diff-hl--when-done (buffer get-value callback &optional proc)
752
(let ((proc (or proc (get-buffer-process buffer))))
0 commit comments