branch: externals/compat
commit 896a9a09b8d1ae2258ded6592af0f1fe8e91a99c
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
compat-tests.el: Fix compat-add-display-text-property for Emacs 30
---
compat-tests.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compat-tests.el b/compat-tests.el
index d6e7cb0a6f..a1460664ff 100644
--- a/compat-tests.el
+++ b/compat-tests.el
@@ -464,7 +464,7 @@
[(raise 0.5) (height 2.0)])
(should-equal (get-text-property 9 'display) '(raise 0.5)))
(with-temp-buffer
- (should-equal (let ((str "some useless string"))
+ (should-equal (let ((str (copy-sequence "some useless string")))
(add-display-text-property 4 8 'height 2.0 str)
(add-display-text-property 2 12 'raise 0.5 str)
str)
