From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 15 Jun 2024 08:37:34 +0000 (+0300)
Subject: Prevent deletion of separator in *edit string* buffer
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=abfd75538df2819eb9336186d486def721ed80b1;p=emacs.git

Prevent deletion of separator in *edit string* buffer

* lisp/textmodes/string-edit.el (string-edit): Make the separator
line read-only.  (Bug#71405)

(cherry picked from commit 6d12157fa85a12208555e291321af97a09243962)
---

diff --git a/lisp/textmodes/string-edit.el b/lisp/textmodes/string-edit.el
index cafed5a1e16..936618dddaa 100644
--- a/lisp/textmodes/string-edit.el
+++ b/lisp/textmodes/string-edit.el
@@ -58,7 +58,8 @@ Also see `read-string-from-buffer'."
                              (list 'intangible t
                                    'face 'string-edit-prompt
                                    'read-only t))
-        (insert (propertize (make-separator-line) 'rear-nonsticky t))
+        (insert (propertize (make-separator-line)
+                            'read-only t 'rear-nonsticky t))
         (add-text-properties (point-min) (point)
                              (list 'string-edit--prompt t))))
     (let ((start (point)))