[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/indent-bars d78829e609 1/2: improve docstring/comment
From: |
ELPA Syncer |
Subject: |
[elpa] externals/indent-bars d78829e609 1/2: improve docstring/comment |
Date: |
Fri, 8 Nov 2024 21:58:17 -0500 (EST) |
branch: externals/indent-bars
commit d78829e609be4bf48dd3145a61b0b9acf758c708
Author: JD Smith <93749+jdtsmith@users.noreply.github.com>
Commit: JD Smith <93749+jdtsmith@users.noreply.github.com>
improve docstring/comment
---
indent-bars.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/indent-bars.el b/indent-bars.el
index 4556cce5ba..cca9986795 100644
--- a/indent-bars.el
+++ b/indent-bars.el
@@ -1252,6 +1252,9 @@ and END. If it returns non-nil, skip font-lock."
;; Always draw bars (which may overwrite 'face in a few places)
(pcase-let ((`(,beg . ,end) (indent-bars--extend-region beg end)))
(with-silent-modifications
+ ;; We remove our display alias here instead of by adding it to
+ ;; `font-lock-extra-managed-keywords' because font-lock will not
+ ;; always be run.
(remove-text-properties beg end '(indent-bars-display nil))
(indent-bars--draw-all-bars-between beg end))
`(jit-lock-bounds ,beg . ,end)))
@@ -1455,7 +1458,9 @@ appropriate for that style."
(list w (length dlist) (string-join dlist)))))
(defsubst indent-bars--whr (w h r)
- "Encoded value for W, H and R."
+ "Encoded value for caching remaps.
+Combines font width W and height H, as well as window edge pixel
+offset R."
(+ (ash w 16) (ash h 8) r))
(defvar-local indent-bars--stipple-remaps nil