emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/gptel d7c9848dd6 1/2: gptel-rewrite: Make overlay front-ad


From: ELPA Syncer
Subject: [nongnu] elpa/gptel d7c9848dd6 1/2: gptel-rewrite: Make overlay front-advance
Date: Mon, 2 Dec 2024 22:00:01 -0500 (EST)

branch: elpa/gptel
commit d7c9848dd6bb033e350835065dd10a2167dcde4a
Author: Karthik Chikmagalur <karthikchikmagalur@gmail.com>
Commit: Karthik Chikmagalur <karthikchikmagalur@gmail.com>

    gptel-rewrite: Make overlay front-advance
    
    * gptel-rewrite.el (gptel--rewrite-callback): Make the rewrite
    overlay front-advance, so you can insert text before it.
    
    * README.org: Fix typo.
---
 README.org       | 2 +-
 gptel-rewrite.el | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index 32813e5b4c..66a961efe2 100644
--- a/README.org
+++ b/README.org
@@ -987,7 +987,7 @@ And then browse through or remove context from the context 
buffer:
 
 *** Rewrite, refactor or fill in a region
 
-In any buffer: with a region selected, you can modify text, rewrite prose or 
refactor code with `gptel-rewrite`.  Example with prose:
+In any buffer: with a region selected, you can modify text, rewrite prose or 
refactor code with =gptel-rewrite=.  Example with prose:
 
 #+html: <p align="center">
 https://github.com/user-attachments/assets/e3b436b3-9bde-4c1f-b2ce-3f7df1984933
diff --git a/gptel-rewrite.el b/gptel-rewrite.el
index b2babb939d..cf17b656fa 100644
--- a/gptel-rewrite.el
+++ b/gptel-rewrite.el
@@ -370,7 +370,7 @@ Show the rewrite result in an overlay over the original 
text, and
 set up dispatch actions.
 
 RESPONSE is the response received.  It may also be t (to indicate
-success) or the symbol `error' (to indicate failure.)
+success) nil (to indicate failure), or the symbol `abort'.
 
 INFO is the async communication channel for the rewrite request."
   (when-let* ((ov-and-buf (plist-get info :context))
@@ -601,7 +601,7 @@ generated from functions."
       :system gptel--rewrite-directive
       :stream gptel-stream
       :context
-      (let ((ov (make-overlay (region-beginning) (region-end))))
+      (let ((ov (make-overlay (region-beginning) (region-end) nil t)))
         (overlay-put ov 'category 'gptel)
         (overlay-put ov 'evaporate t)
         (cons ov (generate-new-buffer "*gptel-rewrite*")))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]