From 72ab6c4f141ce249c34933d1ebc91e2491e34b3a Mon Sep 17 00:00:00 2001 From: Po Lu Date: Thu, 24 Mar 2022 13:50:55 +0800 Subject: [PATCH] Fix setter for hl-line-sticky-flag when hl-line is not loaded * lisp/hl-line.el (hl-line-sticky-flag): Wrap most of setter around (featurep 'hl-line). Reported by Michael Heerdegen . --- lisp/hl-line.el | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/lisp/hl-line.el b/lisp/hl-line.el index e42d1d97d9d..e5ca6819f0d 100644 --- a/lisp/hl-line.el +++ b/lisp/hl-line.el @@ -105,12 +105,13 @@ For that, use `global-hl-line-sticky-flag'." :group 'hl-line :set (lambda (symbol value) (set-default symbol value) - (unless value - (let ((selected (window-buffer (selected-window)))) - (dolist (buffer (buffer-list)) - (unless (eq buffer selected) - (with-current-buffer buffer - (hl-line-unhighlight)))))))) + (when (featurep 'hl-line) + (unless value + (let ((selected (window-buffer (selected-window)))) + (dolist (buffer (buffer-list)) + (unless (eq buffer selected) + (with-current-buffer buffer + (hl-line-unhighlight))))))))) (defcustom global-hl-line-sticky-flag nil "Non-nil means the Global HL-Line mode highlight appears in all windows. -- 2.39.5