[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/git-commit f9ae2a6306: magit-blame--make-highlight-overlay
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/git-commit f9ae2a6306: magit-blame--make-highlight-overlay: Add only to intended line |
Date: |
Sat, 5 Mar 2022 06:58:00 -0500 (EST) |
branch: elpa/git-commit
commit f9ae2a630630e668f5081ad510c1074d18ed76e0
Author: Dan Kessler <kesslerd@umich.edu>
Commit: Jonas Bernoulli <jonas@bernoul.li>
magit-blame--make-highlight-overlay: Add only to intended line
The intention is to add an overlay from BEG to the end of the line
that contains BEG. Previously, however, it was from BEG to the end
of the line that contained point.
Closes #4619.
Co-authored-by: Jonas Bernoulli <jonas@bernoul.li>
---
lisp/magit-blame.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/magit-blame.el b/lisp/magit-blame.el
index b12e0099d5..1e543c88ec 100644
--- a/lisp/magit-blame.el
+++ b/lisp/magit-blame.el
@@ -594,7 +594,9 @@ modes is toggled, then this mode also gets toggled
automatically.
(magit-blame--update-heading-overlay ov)))
(defun magit-blame--make-highlight-overlay (chunk beg)
- (let ((ov (make-overlay beg (1+ (line-end-position)))))
+ (let ((ov (make-overlay beg (save-excursion
+ (goto-char beg)
+ (1+ (line-end-position))))))
(overlay-put ov 'magit-blame-chunk chunk)
(overlay-put ov 'magit-blame-highlight t)
(magit-blame--update-highlight-overlay ov)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/git-commit f9ae2a6306: magit-blame--make-highlight-overlay: Add only to intended line,
ELPA Syncer <=