summaryrefslogtreecommitdiff
path: root/lisp/textmodes/string-edit.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/textmodes/string-edit.el')
-rw-r--r--lisp/textmodes/string-edit.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/textmodes/string-edit.el b/lisp/textmodes/string-edit.el
index 562ab60d137..3270050ca4a 100644
--- a/lisp/textmodes/string-edit.el
+++ b/lisp/textmodes/string-edit.el
@@ -119,9 +119,7 @@ This will kill the current buffer."
(interactive)
(goto-char (point-min))
;; Skip past the help text.
- (when-let ((match (text-property-search-forward
- 'string-edit--prompt nil t)))
- (goto-char (prop-match-beginning match)))
+ (text-property-search-forward 'string-edit--prompt)
(let ((string (buffer-substring (point) (point-max)))
(callback string-edit--success-callback))
(quit-window 'kill)