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

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/indent-bars f80c712b37 288/431: update-current-depth-hi


From: ELPA Syncer
Subject: [elpa] externals/indent-bars f80c712b37 288/431: update-current-depth-highlight: reindent
Date: Mon, 16 Sep 2024 12:59:39 -0400 (EDT)

branch: externals/indent-bars
commit f80c712b371e9cfad4aa48e9a3a3cb46001ec11c
Author: JD Smith <93749+jdtsmith@users.noreply.github.com>
Commit: JD Smith <93749+jdtsmith@users.noreply.github.com>

    update-current-depth-highlight: reindent
---
 indent-bars.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/indent-bars.el b/indent-bars.el
index fecb6685d0..11bbda1c7f 100644
--- a/indent-bars.el
+++ b/indent-bars.el
@@ -1167,12 +1167,13 @@ greater than zero."
           (hl-bg (ibs/current-bg-color s)))
       (when (or hl-col hl-bg (ibs/current-stipple-face s))
        (when-let ((c (alist-get (ibs/tag s) indent-bars--remaps))) ; out with 
the old
-             (face-remap-remove-relative c))
+         (face-remap-remove-relative c))
        (setf (alist-get (ibs/tag s) indent-bars--remaps)
-             (face-remap-add-relative face
-                    `(,@(when hl-col `(:foreground ,hl-col))
-                      ,@(when hl-bg `(:background ,hl-bg)))
-                    (ibs/current-stipple-face s)))))))
+             (face-remap-add-relative
+              face
+              `(,@(when hl-col `(:foreground ,hl-col))
+                ,@(when hl-bg `(:background ,hl-bg)))
+              (ibs/current-stipple-face s)))))))
 
 (defun indent-bars--highlight-current-depth (&optional force)
   "Refresh current indentation depth highlight.



reply via email to

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