From 1ba7d862ce8e2a2423199f665a0e9be13379f05f Mon Sep 17 00:00:00 2001
From: Adrian Kummerlaender
Date: Tue, 17 Sep 2024 12:59:04 +0200
Subject: Update

---
 gui/conf/init.el | 33 ---------------------------------
 1 file changed, 33 deletions(-)

(limited to 'gui/conf')

diff --git a/gui/conf/init.el b/gui/conf/init.el
index a3a6929..5c77f51 100644
--- a/gui/conf/init.el
+++ b/gui/conf/init.el
@@ -564,39 +564,6 @@
     ad-do-it
     (message "org-tangle took %f sec" (float-time (time-subtract (current-time) time)))))
 
-(use-package gptel
-  :ensure t
-  :config
-  (defvar gptel--atlas
-    (gptel-make-openai "atlas"
-                       :stream t
-                       :protocol "http"
-                       :host "10.100.0.3:8081")
-    "GPTel remote backend on atlas")
-  (setq-default gptel-backend gptel--atlas)
-  (setq-default gptel-max-tokens 4096)
-  (defvar gptel-quick--history nil)
-  (defun gptel-quick (&optional prompt)
-    (interactive)
-    (unless prompt
-      (if (use-region-p)
-          (setq prompt (buffer-substring-no-properties (region-beginning) (region-end)))
-        (setq prompt (read-string "AI: "))))
-    (when (string= prompt "") (user-error "Text selection or prompt is required."))
-    (gptel-request
-     prompt
-     :callback
-     (lambda (response info)
-       (if (not response)
-           (message "gptel-quick failed with message: %s" (plist-get info :status))
-         (with-current-buffer (get-buffer-create "*gptel-quick*")
-           (let ((inhibit-read-only t))
-             (erase-buffer)
-             (insert response))
-           (special-mode)
-           (switch-to-buffer "*gptel-quick*"))))))
-  (evil-leader/set-key "g" 'gptel-quick))
-
 (let ((mu4e-config "~/.emacs.d/email.el"))
  (when (file-exists-p mu4e-config)
    (load-file mu4e-config)))
-- 
cgit v1.2.3