From 4e712da4e5e90b02440bd1f435a89ad02ff5a894 Mon Sep 17 00:00:00 2001 From: JenChieh Date: Mon, 5 Feb 2024 17:38:01 -0800 Subject: [PATCH] feat: Extend face --- goto-line-preview.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/goto-line-preview.el b/goto-line-preview.el index ede2663..15c6c6a 100644 --- a/goto-line-preview.el +++ b/goto-line-preview.el @@ -54,7 +54,7 @@ :type 'integer) (defface goto-line-preview-hl - '((t :inherit highlight)) + '((t :inherit highlight :extend t)) "Face to use for highlighting when change preview line." :group 'goto-line-preview) @@ -70,8 +70,9 @@ (defun goto-line-preview--highlight () "Keep highlight for a fixed time." (when goto-line-preview-hl-duration - (let ((overlay (make-overlay (line-beginning-position) (line-end-position)))) + (let ((overlay (make-overlay (line-beginning-position) (1+ (line-end-position))))) (overlay-put overlay 'face 'goto-line-preview-hl) + (overlay-put overlay 'window (selected-window)) (sit-for goto-line-preview-hl-duration) (delete-overlay overlay))))