master 0613e7c33d: Add an instruction header line to string-edit

[Lars Ingebrigtsen]

branch: master
commit 0613e7c33d75a2bc7185439598893ad0bb24e110
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Add an instruction header line to string-edit
    
    * lisp/textmodes/string-edit.el (string-edit): Add a header line
    with instructions.
---
 lisp/textmodes/string-edit.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/textmodes/string-edit.el b/lisp/textmodes/string-edit.el
index 7c3b570224..ff8a492401 100644
--- a/lisp/textmodes/string-edit.el
+++ b/lisp/textmodes/string-edit.el
@@ -66,6 +66,9 @@ buffer, but won't be included in the resulting string."
   (setq-local string-edit--success-callback success-callback)
   (when abort-callback
     (setq-local string-edit--abort-callback abort-callback))
+  (setq-local header-line-format
+              (substitute-command-keys
+               "Type \\<string-edit-mode-map>\\[string-edit-done] when you've 
finished editing or \\[string-edit-abort] to abort"))
   (message "%s" (substitute-command-keys
                  "Type \\<string-edit-mode-map>\\[string-edit-done] when 
you've finished editing")))