refactor: translate user-facing messages to English
This commit is contained in:
@@ -228,7 +228,7 @@ if they exist."
|
|||||||
(push f seen)
|
(push f seen)
|
||||||
(condition-case nil
|
(condition-case nil
|
||||||
(gptel-context-add-file f)
|
(gptel-context-add-file f)
|
||||||
(error (message "kj-gptel: no se pudo añadir AGENTS.md %s" f)))))))
|
(error (message "kj-gptel: could not add AGENTS.md %s" f)))))))
|
||||||
|
|
||||||
(defun kj-gptel--agent-buffer-setup ()
|
(defun kj-gptel--agent-buffer-setup ()
|
||||||
"Load AGENTS.md rules when a gptel-agent session buffer is created.
|
"Load AGENTS.md rules when a gptel-agent session buffer is created.
|
||||||
@@ -269,7 +269,7 @@ that gptel-agent uses for that button. DATA is ignored (compatibility
|
|||||||
with `buttonize')."
|
with `buttonize')."
|
||||||
(interactive)
|
(interactive)
|
||||||
(unless (bound-and-true-p gptel-mode)
|
(unless (bound-and-true-p gptel-mode)
|
||||||
(user-error "No estás en una sesión gptel"))
|
(user-error "You are not in a gptel session"))
|
||||||
(let ((action (kj-gptel--header-button-action)))
|
(let ((action (kj-gptel--header-button-action)))
|
||||||
(if action
|
(if action
|
||||||
(funcall action nil) ; exactamente lo que hace el clic
|
(funcall action nil) ; exactamente lo que hace el clic
|
||||||
@@ -277,7 +277,7 @@ with `buttonize')."
|
|||||||
(gptel--apply-preset
|
(gptel--apply-preset
|
||||||
(if (eq gptel--preset 'gptel-plan) 'gptel-agent 'gptel-plan)
|
(if (eq gptel--preset 'gptel-plan) 'gptel-agent 'gptel-plan)
|
||||||
(lambda (sym val) (set (make-local-variable sym) val)))))
|
(lambda (sym val) (set (make-local-variable sym) val)))))
|
||||||
(message "Modo %s activado" (if (eq gptel--preset 'gptel-plan) "plan" "build")))
|
(message "Mode %s activated" (if (eq gptel--preset 'gptel-plan) "plan" "build")))
|
||||||
|
|
||||||
(defun kj-gptel--eglot-start ()
|
(defun kj-gptel--eglot-start ()
|
||||||
"Start eglot immediately for the current buffer if it is not managed.
|
"Start eglot immediately for the current buffer if it is not managed.
|
||||||
@@ -287,7 +287,7 @@ Unlike `eglot-ensure', this connects right away instead of waiting for a
|
|||||||
(unless eglot--managed-mode
|
(unless eglot--managed-mode
|
||||||
(condition-case err
|
(condition-case err
|
||||||
(apply #'eglot--connect (eglot--guess-contact))
|
(apply #'eglot--connect (eglot--guess-contact))
|
||||||
(error (message "kj-gptel: error iniciando eglot: %s"
|
(error (message "kj-gptel: error starting eglot: %s"
|
||||||
(error-message-string err))))))
|
(error-message-string err))))))
|
||||||
|
|
||||||
(defun kj-gptel--lsp-buffer (&optional path)
|
(defun kj-gptel--lsp-buffer (&optional path)
|
||||||
@@ -436,7 +436,7 @@ plans without adding extra files to the project directory."
|
|||||||
"Generate a PR-style summary of the current gptel session (prompt summary.txt)."
|
"Generate a PR-style summary of the current gptel session (prompt summary.txt)."
|
||||||
(interactive)
|
(interactive)
|
||||||
(unless (bound-and-true-p gptel-mode)
|
(unless (bound-and-true-p gptel-mode)
|
||||||
(user-error "El buffer actual no es una sesión gptel"))
|
(user-error "You are not in a gptel session"))
|
||||||
(let* ((buf (current-buffer))
|
(let* ((buf (current-buffer))
|
||||||
(transcript (buffer-substring-no-properties (point-min) (point-max)))
|
(transcript (buffer-substring-no-properties (point-min) (point-max)))
|
||||||
(out (get-buffer-create "*opencode-summary*")))
|
(out (get-buffer-create "*opencode-summary*")))
|
||||||
@@ -452,13 +452,13 @@ plans without adding extra files to the project directory."
|
|||||||
:stream t
|
:stream t
|
||||||
:system (kj-gptel--read-prompt "summary.txt")
|
:system (kj-gptel--read-prompt "summary.txt")
|
||||||
:callback (lambda (_info &rest _)
|
:callback (lambda (_info &rest _)
|
||||||
(message "Resumen generado en *opencode-summary*")))))
|
(message "Summary generated in *opencode-summary*")))))
|
||||||
|
|
||||||
(defun kj-gptel-opencode-title ()
|
(defun kj-gptel-opencode-title ()
|
||||||
"Generate a title for the current gptel session (prompt title.txt)."
|
"Generate a title for the current gptel session (prompt title.txt)."
|
||||||
(interactive)
|
(interactive)
|
||||||
(unless (bound-and-true-p gptel-mode)
|
(unless (bound-and-true-p gptel-mode)
|
||||||
(user-error "El buffer actual no es una sesión gptel"))
|
(user-error "You are not in a gptel session"))
|
||||||
(let* ((buf (current-buffer))
|
(let* ((buf (current-buffer))
|
||||||
(transcript (buffer-substring-no-properties (point-min) (point-max)))
|
(transcript (buffer-substring-no-properties (point-min) (point-max)))
|
||||||
(tmp (generate-new-buffer " *gptel-title*")))
|
(tmp (generate-new-buffer " *gptel-title*")))
|
||||||
@@ -477,7 +477,7 @@ plans without adding extra files to the project directory."
|
|||||||
(kill-buffer tmp)
|
(kill-buffer tmp)
|
||||||
(with-current-buffer buf
|
(with-current-buffer buf
|
||||||
(rename-buffer (format "*gptel-agent:%s*" title) t))
|
(rename-buffer (format "*gptel-agent:%s*" title) t))
|
||||||
(message "Título: %s" title))))))
|
(message "Title: %s" title))))))
|
||||||
:custom
|
:custom
|
||||||
(kj-gptel-opencode-small-model nil)
|
(kj-gptel-opencode-small-model nil)
|
||||||
:bind
|
:bind
|
||||||
|
|||||||
Reference in New Issue
Block a user