From 2bf5a7dd9010ca6c7d3e553b58343108a5f9fe20 Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Thu, 6 Jun 2024 12:03:22 +0200 Subject: [PATCH] Update go-translate package settings --- bundle/bundle--package.el | 22 +++++++++++++++++++--- 1 file changed, 19 insertions(+), 3 deletions(-) diff --git a/bundle/bundle--package.el b/bundle/bundle--package.el index c34a731f..9af95343 100644 --- a/bundle/bundle--package.el +++ b/bundle/bundle--package.el @@ -1,6 +1,22 @@ ;; PACKAGE (require 'package) +(defun get-auth-key (host) + "Retrieve the Anthropics API key using 'auth-source'." + (require 'auth-source) + (let* ((auth-source-creation-prompts + '((secret . "API key for %u@%h: "))) + (found (nth 0 (auth-source-search + :max 1 + :host host + :user "apikey" + :require '(:secret) + :create t))) + (secret (plist-get found :secret))) + (if (functionp secret) + (funcall secret) + secret))) + (use-package htmlize) (use-package tramp @@ -190,11 +206,10 @@ (use-package go-translate :defer t :config - (setq gt-translate-list '(("en" "de") ("de" "en"))) (setq gt-default-translator (gt-translator :taker (gt-taker :langs '(en de)) - :engines (list (gt-bing-engine) (gt-google-engine)) - :render (gt-buffer-render)))) + :engines (gt-google-engine) + :render (gt-buffer-render)))) (use-package magit :bind ("C-x g" . magit-status) @@ -352,6 +367,7 @@ ;; :defer t ;; :after json-mode) + (defun get-anthropic-key () "Retrieve the Anthropics API key using 'auth-source'." (require 'auth-source)