This commit is contained in:
Akko
2025-08-23 00:42:35 +02:00
parent 62dd664426
commit a0a4559151
4 changed files with 96 additions and 30 deletions

View File

@@ -17,10 +17,14 @@
(if (string= (system-name) "illya") (if (string= (system-name) "illya")
(set-frame-font "Monoflow 12" nil t) (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) (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) (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 a") 'paste-above)
(define-key evil-normal-state-map (kbd "g p") 'paste-below) (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 (map! :leader
"." #'counsel-find-file) "." #'find-file)
; TODO fix ; TODO fix
(map! :after counsel "C-s" #'swiper) (map! :after vertico "C-s" #'+default/search-buffer)
(after! evil-escape (after! evil-escape
(setq evil-escape-key-sequence "jj") (setq evil-escape-key-sequence "jj")
@@ -42,7 +46,7 @@
(which-key-mode 1) (which-key-mode 1)
(setq which-key-idle-delay 0.25) (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 (setq ivy-height 10
ivy-count-format "(%d/%d) " ivy-count-format "(%d/%d) "
@@ -87,10 +91,10 @@
(setq python-shell-completion-native-disabled-interpreters '("ipython")) (setq python-shell-completion-native-disabled-interpreters '("ipython"))
(setq org-roam-directory (file-truename "/mnt/tenma/srv/boymind")) (setq org-roam-directory (file-truename "/mnt/tenma/srv/boymind"))
; this seems to be broken right now ; this seems to be broken right now
;(use-package! org-roam ;(use-package! org-roam
; :config ; :config
; (setq org-roam-database-connector 'sqlite3)) ; (setq org-roam-database-connector 'sqlite3))
(condition-case nil (condition-case nil
(org-roam-db-autosync-mode) (org-roam-db-autosync-mode)
(file-error (progn (file-error (progn
@@ -113,6 +117,13 @@
(setq lsp-enable-links nil) (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) (require 'ox-publish)
(defun blog/get-util (x) (defun blog/get-util (x)
@@ -192,7 +203,7 @@
("static" ("static"
:base-directory "~/Blog/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 :recursive t
:publishing-directory "~/Blog/html/static" :publishing-directory "~/Blog/html/static"
:publishing-function org-publish-attachment) :publishing-function org-publish-attachment)
@@ -235,3 +246,20 @@
(setq shell-file-name (executable-find "bash")) (setq shell-file-name (executable-find "bash"))
(setq-default vterm-shell (executable-find "fish")) (setq-default vterm-shell (executable-find "fish"))
(setq-default explicit-shell-file-name (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))

View File

@@ -26,12 +26,16 @@ Honestly I barely remember what some of this stuff is supposed to do, this is th
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(if (string= (system-name) "illya") (if (string= (system-name) "illya")
(set-frame-font "Monoflow 12" nil t) (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 #+END_SRC
** Theme ** Theme
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(setq doom-theme 'doom-ayu-mirage) (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 #+END_SRC
** Other ** Other
#+BEGIN_SRC emacs-lisp #+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 a") 'paste-above)
(define-key evil-normal-state-map (kbd "g p") 'paste-below) (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 (map! :leader
"." #'counsel-find-file) "." #'find-file)
; TODO fix ; TODO fix
(map! :after counsel "C-s" #'swiper) (map! :after vertico "C-s" #'+default/search-buffer)
(after! evil-escape (after! evil-escape
(setq evil-escape-key-sequence "jj") (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) (which-key-mode 1)
(setq which-key-idle-delay 0.25) (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 #+END_SRC
* Completion * Completion
@@ -130,10 +134,10 @@ Make ace-window work across frames
*** Roam *** Roam
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(setq org-roam-directory (file-truename "/mnt/tenma/srv/boymind")) (setq org-roam-directory (file-truename "/mnt/tenma/srv/boymind"))
; this seems to be broken right now ; this seems to be broken right now
;(use-package! org-roam ;(use-package! org-roam
; :config ; :config
; (setq org-roam-database-connector 'sqlite3)) ; (setq org-roam-database-connector 'sqlite3))
(condition-case nil (condition-case nil
(org-roam-db-autosync-mode) (org-roam-db-autosync-mode)
(file-error (progn (file-error (progn
@@ -171,6 +175,16 @@ Make ace-window work across frames
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(setq lsp-enable-links nil) (setq lsp-enable-links nil)
#+END_SRC #+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 * Blog
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(require 'ox-publish) (require 'ox-publish)
@@ -252,7 +266,7 @@ Make ace-window work across frames
("static" ("static"
:base-directory "~/Blog/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 :recursive t
:publishing-directory "~/Blog/html/static" :publishing-directory "~/Blog/html/static"
:publishing-function org-publish-attachment) :publishing-function org-publish-attachment)
@@ -299,4 +313,25 @@ Make ace-window work across frames
(setq-default vterm-shell (executable-find "fish")) (setq-default vterm-shell (executable-find "fish"))
(setq-default explicit-shell-file-name (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 #+END_SRC

View File

@@ -16,11 +16,11 @@
company ; the ultimate code completion backend company ; the ultimate code completion backend
;;helm ; the *other* search engine for love and life ;;helm ; the *other* search engine for love and life
;;ido ; the other *other* search engine... ;;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 :checkers

View File

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