branch: externals/indent-bars
commit 7d63303e27acbc7cfb87dcccd53cca5c00386ad8
Author: JD Smith <[email protected]>
Commit: JD Smith <[email protected]>
current-indentation-depth: no takes no POS arg, use s-e
---
indent-bars-ts.el | 4 +++-
indent-bars.el | 2 +-
2 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/indent-bars-ts.el b/indent-bars-ts.el
index e0cddf86c7..d1f0f82c5c 100644
--- a/indent-bars-ts.el
+++ b/indent-bars-ts.el
@@ -332,7 +332,9 @@ ranges and update. Note that the updated node range clips
to an
(setf (ibts/tick ibtcs) (buffer-modified-tick)
(ibts/point ibtcs) (point)
(ibts/start-bars ibtcs)
- (indent-bars--current-indentation-depth nil (car new)))
+ (save-excursion
+ (goto-char (car new))
+ (indent-bars--current-indentation-depth)))
(cl-loop for rng in (indent-bars-ts--union old new)
for (beg . end) = (indent-bars-ts--intersection rng
clip-wide)
do (font-lock-flush beg end))
diff --git a/indent-bars.el b/indent-bars.el
index bd7b8528b5..6e6e6fa997 100644
--- a/indent-bars.el
+++ b/indent-bars.el
@@ -997,7 +997,7 @@ font-lock properties."
BEG and END should be on the same line. STYLE, SWITCH-AFTER and
STYLE2 are as in `indent-bars--draw-line'. If STYLE is not
passed, uses `indent-bars-style' for drawing."
- (let ((n (indent-bars--current-indentation-depth nil beg)))
+ (let ((n (indent-bars--current-indentation-depth)))
(when (> n 0) (indent-bars--draw-line style n beg end nil
switch-after style2))))
