[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/gptel c6abda6f0f 075/273: gptel-transient: Rename gptel-se
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/gptel c6abda6f0f 075/273: gptel-transient: Rename gptel-send-menu -> gptel-menu |
Date: |
Wed, 1 May 2024 10:01:46 -0400 (EDT) |
branch: elpa/gptel
commit c6abda6f0fa64d49db41b3266ec0c8c83d7862eb
Author: Karthik Chikmagalur <karthikchikmagalur@gmail.com>
Commit: Karthik Chikmagalur <karthikchikmagalur@gmail.com>
gptel-transient: Rename gptel-send-menu -> gptel-menu
* gptel.el (gptel-send): Replace references to `gptel-send-menu'.
* gptel-transient.el: Rename `gptel-send-menu' t `gptel-menu'.
This shorter name is apropos of its increased feature set (in the
forthcoming commits).
---
gptel-transient.el | 29 ++++++++++++++++++++++++++---
gptel.el | 8 ++++----
2 files changed, 30 insertions(+), 7 deletions(-)
diff --git a/gptel-transient.el b/gptel-transient.el
index a94cc05122..274880615b 100644
--- a/gptel-transient.el
+++ b/gptel-transient.el
@@ -29,8 +29,31 @@
(require 'gptel)
(require 'transient)
-;;;###autoload (autoload 'gptel-send-menu "gptel-transient" nil t)
-(transient-define-prefix gptel-send-menu ()
+(declare-function ediff-regions-internal "ediff")
+(declare-function ediff-make-cloned-buffer "ediff-utils")
+
+;; * Helper functions
+(defun gptel--refactor-or-rewrite ()
+ "Rewrite should be refactored into refactor.
+
+Or is it the other way around?"
+ (if (derived-mode-p 'prog-mode)
+ "Refactor" "Rewrite"))
+
+(defvar-local gptel--rewrite-message nil)
+(defun gptel--rewrite-message ()
+ "Set a generic refactor/rewrite message for the buffer."
+ (if (derived-mode-p 'prog-mode)
+ (format "You are a %s programmer. Refactor the following code. Generate
only code, no explanation."
+ (substring (symbol-name major-mode) nil -5))
+ (format "You are a prose editor. Rewrite the following text to be more
professional.")))
+
+;; * Transient Prefixes
+
+(define-obsolete-function-alias 'gptel-send-menu 'gptel-menu "0.3.2")
+
+;;;###autoload (autoload 'gptel-menu "gptel-transient" nil t)
+(transient-define-prefix gptel-menu ()
"Change parameters of prompt to send ChatGPT."
[:description
(lambda () (format "Directive: %s"
@@ -233,7 +256,7 @@ will get progressively longer!"
`((display-buffer-reuse-window
display-buffer-use-some-window)
(body-function . ,#'select-window)))
- (call-interactively #'gptel-send-menu))))))
+ (call-interactively #'gptel-menu))))))
(provide 'gptel-transient)
;;; gptel-transient.el ends here
diff --git a/gptel.el b/gptel.el
index 656ce429b7..fc50b24370 100644
--- a/gptel.el
+++ b/gptel.el
@@ -54,7 +54,7 @@
;;; Code:
(declare-function markdown-mode "markdown-mode")
(declare-function gptel-curl-get-response "gptel-curl")
-(declare-function gptel-send-menu "gptel-transient")
+(declare-function gptel-menu "gptel-transient")
(declare-function pulse-momentary-highlight-region "pulse")
(eval-when-compile
@@ -260,14 +260,14 @@ By default, \"openai.com\" is used as HOST and \"apikey\"
as USER."
" " 'display `(space :align-to ,(max 1 (-
(window-width) (+ 2 l1 l2)))))
(propertize
(button-buttonize num-exchanges
- (lambda (&rest _) (gptel-send-menu)))
+ (lambda (&rest _) (gptel-menu)))
'mouse-face 'highlight
'help-echo
"Number of past exchanges to include with each request")
" "
(propertize
(button-buttonize (concat "[" gptel-model "]")
- (lambda (&rest _) (gptel-send-menu)))
+ (lambda (&rest _) (gptel-menu)))
'mouse-face 'highlight
'help-echo "OpenAI GPT model in use"))))))
(setq header-line-format gptel--old-header-line)))
@@ -395,7 +395,7 @@ With prefix arg ARG activate a transient menu with more
options
instead."
(interactive "P")
(if (and arg (require 'gptel-transient nil t))
- (call-interactively #'gptel-send-menu)
+ (call-interactively #'gptel-menu)
(message "Querying ChatGPT...")
(let* ((response-pt
(if (use-region-p)
- [nongnu] elpa/gptel 07992f79cc 227/273: gptel-anthropic: Support for the Claude haiku model, (continued)
- [nongnu] elpa/gptel 07992f79cc 227/273: gptel-anthropic: Support for the Claude haiku model, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel fbb0ee29c4 224/273: gptel-org-test: Add mores tests for org conversion, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 376fb4b423 234/273: gptel-transient: Additional directives option (#249), ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 34a52aa047 246/273: gptel-anthropic: Remove debug code, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel e3b3591d73 240/273: README: Add support for Groq (#257), ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 81bb467104 250/273: gptel: Set window when running post-response hook, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel b4088e3f7b 261/273: README: New pacakge based on gptel, magit-gptcommit (#281), ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 9b094b8b1e 265/273: gptel: Fix url-retrieve response parser bug, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 2b2dbe2664 043/273: gptel: Fix parsing error in url-retrieve buffer, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 5ebaf361f1 046/273: gptel: Handle the prompt prefix string automatically, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel c6abda6f0f 075/273: gptel-transient: Rename gptel-send-menu -> gptel-menu,
ELPA Syncer <=
- [nongnu] elpa/gptel 8a9ae56e77 074/273: gptel: Add streaming, in-place options to gptel-request, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel ba133267ec 063/273: gptel: Run post-response-hook after inserting response, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 23caab41cf 042/273: Add gpt-4 model, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 1c07a94e18 052/273: README: Update manual install instructions, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel f0953d569e 069/273: gptel: Simplify response API, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 6c47c0a483 066/273: README: Add videos with streaming, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel c11e53061c 078/273: gptel-transient: New gptel-menu transient options, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 422eba8048 087/273: gptel-curl: Run post-response-hook in gptel buffer, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 42132d3662 093/273: README: tweak description of package, ELPA Syncer, 2024/05/01
- [nongnu] elpa/gptel 07f27be696 101/273: gptel-transient: UI tweak for custom prompt, ELPA Syncer, 2024/05/01