[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 820e6f399d: Fix thinko in read-string-from-buffer
From: |
Lars Ingebrigtsen |
Subject: |
master 820e6f399d: Fix thinko in read-string-from-buffer |
Date: |
Wed, 12 Oct 2022 07:41:04 -0400 (EDT) |
branch: master
commit 820e6f399d0af56ebfdc581f68424f4cb9cbe53b
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix thinko in read-string-from-buffer
* lisp/textmodes/string-edit.el (string-edit-done): Return an empty
string when the user has entered no text.
---
lisp/textmodes/string-edit.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/lisp/textmodes/string-edit.el b/lisp/textmodes/string-edit.el
index 562ab60d13..3270050ca4 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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 820e6f399d: Fix thinko in read-string-from-buffer,
Lars Ingebrigtsen <=