diff options
Diffstat (limited to 'gui/conf/init.el')
-rw-r--r-- | gui/conf/init.el | 38 |
1 files changed, 1 insertions, 37 deletions
diff --git a/gui/conf/init.el b/gui/conf/init.el index c94b4f0..5c77f51 100644 --- a/gui/conf/init.el +++ b/gui/conf/init.el @@ -1,9 +1,6 @@ (setq inhibit-startup-message t) (setq initial-scratch-message nil) -(setq load-path (seq-filter (lambda (x) (not (string-match-p "org-202109" x))) - load-path)) - (require 'package) (package-initialize) @@ -120,7 +117,7 @@ :after evil :ensure t :config - (setq evil-collection-mode-list '(dired eshell eww pdf magit ediff pdf)) + (setq evil-collection-mode-list '(dired eshell eww pdf magit ediff pdf mu4e)) (evil-collection-init)) (use-package which-key @@ -567,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))) |