Fix 'string-edit' when abort-callback is omitted
* lisp/textmodes/string-edit.el (string-edit): Set 'string-edit--abort-callback' even if ABORT-CALLBACK is nil. (Bug#71406)
This commit is contained in:
parent
c03cafba39
commit
bd50c804ec
1 changed files with 1 additions and 2 deletions
|
@ -75,8 +75,7 @@ Also see `read-string-from-buffer'."
|
|||
(setq buffer-undo-list nil)
|
||||
(string-edit-mode)
|
||||
(setq-local string-edit--success-callback success-callback)
|
||||
(when abort-callback
|
||||
(setq-local string-edit--abort-callback 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"))
|
||||
|
|
Loading…
Add table
Reference in a new issue