[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/indent-bars 1b6e353634 225/431: Correctly track separat
From: |
ELPA Syncer |
Subject: |
[elpa] externals/indent-bars 1b6e353634 225/431: Correctly track separate stipple face for each style |
Date: |
Mon, 16 Sep 2024 12:59:31 -0400 (EDT) |
branch: externals/indent-bars
commit 1b6e353634d5cfb5627ff71b8967049cd5a6189a
Author: JD Smith <93749+jdtsmith@users.noreply.github.com>
Commit: JD Smith <93749+jdtsmith@users.noreply.github.com>
Correctly track separate stipple face for each style
---
indent-bars.el | 17 ++++++++++-------
1 file changed, 10 insertions(+), 7 deletions(-)
diff --git a/indent-bars.el b/indent-bars.el
index 8eaf7d8a98..b176fb8831 100644
--- a/indent-bars.el
+++ b/indent-bars.el
@@ -506,7 +506,9 @@ May be nil, a color string or a vector of colors strings.")
:documentation "A vector of style non-stipple chars.")
;; Current depth remapping
( remap nil :type list
- :documentation "An active face-remap cookie.")
+ :documentation "An active face-remap cookie for faces.")
+ ( remap-stipple nil :type list
+ :documentation "An active face-remap cookie for stipple.")
( current-bg-color nil :type color
:documentation "The background color of the current depth highlight.")
( current-depth-palette nil
@@ -1201,7 +1203,6 @@ Rate limit set by `indent-bars-depth-update-delay'."
#'indent-bars--update-current-depth-highlight depth)))))))
;;;; Text scaling and window hooks
-(defvar-local indent-bars--remap-stipple nil)
(defvar-local indent-bars--gutter-rot 0)
(defun indent-bars--window-change (win)
"Update the stipple for buffer in window WIN, if selected."
@@ -1218,12 +1219,12 @@ W is the optional `window-font-width' and ROT is the
number of
bits to rotate the pattern. If W and ROT are not passed they
will be calculated."
(dolist (s indent-bars--styles)
- (if (ibs/remap s)
- (face-remap-remove-relative (ibs/remap s)))
+ (if (ibs/remap-stipple s)
+ (face-remap-remove-relative (ibs/remap-stipple s)))
(let* ((w (or w (window-font-width)))
(rot (or rot (indent-bars--stipple-rot w)))
(h (window-font-height)))
- (setf (ibs/remap s)
+ (setf (ibs/remap-stipple s)
(face-remap-add-relative
(ibs/stipple-face s)
:stipple (indent-bars--stipple w h rot)))
@@ -1374,8 +1375,10 @@ Adapted from `highlight-indentation-mode'."
(defun indent-bars-teardown ()
"Tears down indent-bars."
(dolist (s indent-bars--styles)
- (if (ibs/remap s)
- (face-remap-remove-relative (ibs/remap s)))
+ (when (ibs/remap s)
+ (face-remap-remove-relative (ibs/remap s)))
+ (when (ibs/remap-stipple s)
+ (face-remap-remove-relative (ibs/remap-stipple s)))
(face-spec-set (ibs/stipple-face s) nil 'reset)
(cl-loop for f in (ibs/faces s)
do (face-spec-set f nil 'reset)))
- [elpa] externals/indent-bars 1875deadb7 166/431: Report TS string query error, (continued)
- [elpa] externals/indent-bars 1875deadb7 166/431: Report TS string query error, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 20e34365e9 191/431: ts: improved query setup, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 2e0e6ee0fd 196/431: add support for ts start-bars to switch from oos to emph w/in line, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars a4d43c0054 163/431: README: FAQ starting-column, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 7b6454d6e8 190/431: ts.el: improve docs and customization options, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars f5d9426fe6 199/431: overhaul style-system: pass-by-arg, switch-after, style2, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 9f2b7625b4 212/431: scope-update: reference correct timer, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 28cc7f4a82 216/431: Use "ts" alt style uniformly, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 2889b50077 224/431: Always initialize style on scope init, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 230e3c8377 221/431: setup-and-remove: wrap in with-selected-frame, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 1b6e353634 225/431: Correctly track separate stipple face for each style,
ELPA Syncer <=
- [elpa] externals/indent-bars 9740b6ff4a 227/431: Add min-lines support for scope, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 09dd1d6f75 209/431: Correct after-make-frame handling for daemon, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 226b6c2dd0 226/431: custom-inherit: correctly handle 'unspecified atoms, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars dbbd7fb1ed 218/431: Add (custom-inherit): Improve inheritance for partial plists, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars b8319cf7d4 237/431: add support for json-ts-mode and json-mode, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 4ad704782a 233/431: Properly handle SWITCH-AFTER=0, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 7acbd9124b 235/431: README: Acknowledgements, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 117121cbd6 230/431: Guard update-scope against non-mode buffers, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars cd463afdbc 223/431: Use union of old and new ranges, not symdiff, ELPA Syncer, 2024/09/16
- [elpa] externals/indent-bars 48646b1123 234/431: README: Acknowledgements, ELPA Syncer, 2024/09/16