UHHHHH

config.el

@@ -17,10 +17,14 @@
 
 (if (string= (system-name) "illya")
     (set-frame-font "Monoflow 12" nil t)
-  (set-frame-font "Monoflow Medium 20" nil t))
+  (set-frame-font "Mononoki 12" nil t))
-(set-frame-font "Mononoki Medium 12")
+(set-frame-font "Mononoki 13")
 
 (setq doom-theme 'doom-ayu-mirage)
+(add-to-list 'custom-theme-load-path
+             (expand-file-name "themes" doom-user-dir))
+(add-to-list 'custom-theme-load-path
+             (expand-file-name "themes" "~/.emacs.d"))
 
 (display-time-mode 1)
 
@@ -28,12 +32,12 @@
 (define-key evil-normal-state-map (kbd "g a") 'paste-above)
 (define-key evil-normal-state-map (kbd "g p") 'paste-below)
 
-(global-set-key (kbd "C-x C-f") #'counsel-find-file)
+(global-set-key (kbd "C-x C-f") #'find-file)
 (map! :leader
-      "." #'counsel-find-file)
+      "." #'find-file)
 
                                         ; TODO fix
-(map! :after counsel "C-s" #'swiper)
+(map! :after vertico "C-s" #'+default/search-buffer)
 
 (after! evil-escape
   (setq evil-escape-key-sequence "jj")
@@ -42,7 +46,7 @@
 (which-key-mode 1)
 (setq which-key-idle-delay 0.25)
 
-(defun doom/find-file-in-private-config () (interactive) (counsel-find-file doom-user-dir))
+                                        ;(defun doom/find-file-in-private-config () (interactive) (find-file doom-user-dir))
 
 (setq ivy-height                10
       ivy-count-format          "(%d/%d) "
@@ -113,6 +117,13 @@
 
 (setq lsp-enable-links nil)
 
+(after! circe
+  (set-irc-server! "irc.rizon.net"
+    '(:tls t
+      :port 6697
+      :nick "akk0"
+      :channels ("#r/a/dio"))))
+
 (require 'ox-publish)
 
 (defun blog/get-util (x)
@@ -192,7 +203,7 @@
 
       ("static"
        :base-directory "~/Blog/static"
-       :base-extension "css\\|txt\\|jpg\\|gif\\|png\\|ttf\\|js"
+       :base-extension "css\\|txt\\|jpg\\|gif\\|png\\|ttf\\|js\\|mp4\\|webm"
        :recursive t
        :publishing-directory  "~/Blog/html/static"
        :publishing-function org-publish-attachment)
@@ -235,3 +246,20 @@
 (setq shell-file-name (executable-find "bash"))
 (setq-default vterm-shell (executable-find "fish"))
 (setq-default explicit-shell-file-name (executable-find "fish"))
+
+(after! auth-source
+  (setq auth-sources (append '("~/.authinfo") auth-sources)))
+
+(use-package! gptel
+  :config
+  (gptel-make-openai "OpenRouter"               ;Any name you want
+    :host "openrouter.ai"
+    :endpoint "/api/v1/chat/completions"
+    :stream t
+    :key #'gptel-api-key-from-auth-source
+    :models '(anthropic/claude-3.7-sonnet:beta))
+  (map! :leader
+        (:prefix-map ("z" . "AI")
+         :desc "Send to GPT" "z" #'gptel-send
+         :desc "GPT menu" "m" #'gptel-menu))
+  (setq gptel-default-mode #'org-mode))

config.org

@@ -26,12 +26,16 @@ Honestly I barely remember what some of this stuff is supposed to do, this is th
 #+BEGIN_SRC emacs-lisp
 (if (string= (system-name) "illya")
     (set-frame-font "Monoflow 12" nil t)
-  (set-frame-font "Monoflow Medium 20" nil t))
+  (set-frame-font "Mononoki 12" nil t))
-(set-frame-font "Mononoki Medium 12")
+(set-frame-font "Mononoki 13")
 #+END_SRC
 ** Theme
 #+BEGIN_SRC emacs-lisp
 (setq doom-theme 'doom-ayu-mirage)
+(add-to-list 'custom-theme-load-path
+             (expand-file-name "themes" doom-user-dir))
+(add-to-list 'custom-theme-load-path
+             (expand-file-name "themes" "~/.emacs.d"))
 #+END_SRC
 ** Other
 #+BEGIN_SRC emacs-lisp
@@ -44,12 +48,12 @@ Honestly I barely remember what some of this stuff is supposed to do, this is th
 (define-key evil-normal-state-map (kbd "g a") 'paste-above)
 (define-key evil-normal-state-map (kbd "g p") 'paste-below)
 
-(global-set-key (kbd "C-x C-f") #'counsel-find-file)
+(global-set-key (kbd "C-x C-f") #'find-file)
 (map! :leader
-      "." #'counsel-find-file)
+      "." #'find-file)
 
                                         ; TODO fix
-(map! :after counsel "C-s" #'swiper)
+(map! :after vertico "C-s" #'+default/search-buffer)
 
 (after! evil-escape
   (setq evil-escape-key-sequence "jj")
@@ -58,7 +62,7 @@ Honestly I barely remember what some of this stuff is supposed to do, this is th
 (which-key-mode 1)
 (setq which-key-idle-delay 0.25)
 
-(defun doom/find-file-in-private-config () (interactive) (counsel-find-file doom-user-dir))
+                                        ;(defun doom/find-file-in-private-config () (interactive) (find-file doom-user-dir))
 #+END_SRC
 
 * Completion
@@ -171,6 +175,16 @@ Make ace-window work across frames
 #+BEGIN_SRC emacs-lisp
 (setq lsp-enable-links nil)
 #+END_SRC
+* IRC
+#+BEGIN_SRC emacs-lisp
+(after! circe
+  (set-irc-server! "irc.rizon.net"
+    '(:tls t
+      :port 6697
+      :nick "akk0"
+      :channels ("#r/a/dio"))))
+#+END_SRC
+
 * Blog
 #+BEGIN_SRC emacs-lisp
 (require 'ox-publish)
@@ -252,7 +266,7 @@ Make ace-window work across frames
 
       ("static"
        :base-directory "~/Blog/static"
-       :base-extension "css\\|txt\\|jpg\\|gif\\|png\\|ttf\\|js"
+       :base-extension "css\\|txt\\|jpg\\|gif\\|png\\|ttf\\|js\\|mp4\\|webm"
        :recursive t
        :publishing-directory  "~/Blog/html/static"
        :publishing-function org-publish-attachment)
@@ -299,4 +313,25 @@ Make ace-window work across frames
 (setq-default vterm-shell (executable-find "fish"))
 (setq-default explicit-shell-file-name (executable-find "fish"))
 
+#+END_SRC
+* Antichrist
+#+BEGIN_SRC emacs-lisp
+(after! auth-source
+  (setq auth-sources (append '("~/.authinfo") auth-sources)))
+
+(use-package! gptel
+  :config
+  (gptel-make-openai "OpenRouter"               ;Any name you want
+    :host "openrouter.ai"
+    :endpoint "/api/v1/chat/completions"
+    :stream t
+    :key #'gptel-api-key-from-auth-source
+    :models '(anthropic/claude-3.7-sonnet:beta))
+  (map! :leader
+        (:prefix-map ("z" . "AI")
+         :desc "Send to GPT" "z" #'gptel-send
+         :desc "GPT menu" "m" #'gptel-menu))
+  (setq gptel-default-mode #'org-mode))
+
+
 #+END_SRC

init.el

@@ -16,11 +16,11 @@
        company           ; the ultimate code completion backend
        ;;helm              ; the *other* search engine for love and life
        ;;ido               ; the other *other* search engine...
-       (ivy                ; a search engine for love and life
+       ;(ivy                ; a search engine for love and life
-       +prescient
+       ;+prescient
-        +icons)
+       ; +icons)
 
-       vertico ;;todo checkout
+       (vertico +icons)
 
 
        :checkers

packages.el

@@ -15,5 +15,8 @@
 (package! elcord)
 (package! emacsql-sqlite3)
 
+; I love the antichrist
+(package! gptel)
+
 (package! sly-overlay
 	      :recipe (:host sourcehut :repo "fosskers/sly-overlay") :pin "916b50297a1f3bb110f840b89b8717d194623e5f")