branch: elpa/gptel
commit 3fe5e08ddd8b1bc6f1eee8a9c6548bf7a029f55e
Author: Karthik Chikmagalur <karthikchikmaga...@gmail.com>
Commit: Karthik Chikmagalur <karthikchikmaga...@gmail.com>
gptel-rewrite: Select rewrite message by default (#1022)
* gptel-rewrite.el (gptel-rewrite, gptel-rewrite-menu): When
reading rewrite instructions from the minibuffer, the last
used message is pre-inserted. Mark this message so it's easier to
delete.
Remove obsolete alias `gptel-rewrite-menu'.
---
gptel-rewrite.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/gptel-rewrite.el b/gptel-rewrite.el
index bca6ae9f49c..803276acaf4 100644
--- a/gptel-rewrite.el
+++ b/gptel-rewrite.el
@@ -263,7 +263,8 @@ input history list."
(cb (current-buffer))
(cycle-prefix (lambda () (interactive)
(gptel--read-with-prefix rewrite-directive)
- (goto-char (point-max))))
+ (push-mark) (goto-char (point-max))
+ (activate-mark)))
(set-rewrite-message
(lambda ()
(let ((message (buffer-substring-no-properties
@@ -569,8 +570,6 @@ By default, gptel uses the directive associated with the
`rewrite'
'gptel--rewrite-directive "Rewrite directive")))
:pad-keys t])
-(define-obsolete-function-alias 'gptel-rewrite-menu 'gptel-rewrite "0.9.6")
-
;;;###autoload (autoload 'gptel-rewrite "gptel-rewrite" nil t)
(transient-define-prefix gptel-rewrite ()
"Rewrite or refactor text region using an LLM."
