emacs-elpa-diffs
[Top][All Lists]
Advanced

[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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]