[elpa] externals/compat 896a9a09b8 4/5: compat-tests.el: Fix compat-add-display-text-property for Emacs 30

[ELPA Syncer]

branch: externals/compat
commit 896a9a09b8d1ae2258ded6592af0f1fe8e91a99c
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@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)