branch: externals/indent-bars
commit f64e33bf37113273b53ff01fc54a24c1fa2b0ad1
Author: JD Smith <[email protected]>
Commit: JD Smith <[email protected]>
correctly test style tag string with #'equal
---
indent-bars.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/indent-bars.el b/indent-bars.el
index febee8fb0b..ae4fb665d1 100644
--- a/indent-bars.el
+++ b/indent-bars.el
@@ -554,7 +554,7 @@ Additional `format' arguments can be passed as R."
"Create and record a new style struct with TAG.
A new style is only created if an existing style with that TAG is
no yet recorded."
- (or (seq-find (lambda (s) (eq (ibs/tag s) tag)) indent-bars--styles)
+ (or (seq-find (lambda (s) (equal (ibs/tag s) tag)) indent-bars--styles)
(let ((style (ibs/create tag)))
(cl-pushnew style indent-bars--styles :test #'equal)
style)))
