tristan/gptel
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gptel-transient: better multi-line directive editing

Browse source 
* gptel-transient.el (gptel--suffix-system-message): Mark the
whole directive when editing it in the `*gptel-system*` buffer.
Previously only the first line of the directive was being marked.
This commit is contained in:
Karthik Chikmagalur 2024-01-30 21:06:03 -08:00
parent f0e4889c36
commit a61fda4661
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gptel-transient.el
View file

@ -583,9 +583,9 @@ This uses the prompts in the variable
;; TODO: make-separator-line requires Emacs 28.1+.
;; (insert (propertize (make-separator-line) 'rear-nonsticky t))
(set-marker msg-start (point))
(insert (buffer-local-value 'gptel--system-message orig-buf))
(push-mark)
(beginning-of-line)
(save-excursion
(insert (buffer-local-value 'gptel--system-message orig-buf))
(push-mark nil 'nomsg))
(activate-mark))
(display-buffer (current-buffer)
`((display-buffer-below-selected)