tweaks to org and sly

This commit is contained in:
Chris Cochrun 2023-12-06 15:25:19 -06:00
parent de803b699a
commit 73ca11bef7
2 changed files with 24 additions and 8 deletions

View file

@ -1413,7 +1413,8 @@ Org-Superstar makes the stars at the beginning of the line in =org-mode= a lot p
:config
(setq org-modern-timestamp nil
org-modern-table nil)
org-modern-table nil
org-modern-star '("◉" "○" "◈" "◇" "✳"))
(custom-set-faces
'(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36")))
@ -2003,10 +2004,6 @@ GPTEL is a package that uses chatGPT to get some text generation in org-mode
gptel-api-key "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"))
#+end_src
#+begin_ai
is emacs the best?
#+end_ai
*** Ellama
Idk, let's try this i guess
@ -4192,9 +4189,18 @@ Using sly makes a lot better common-lisp interaction within emacs.
("\\.lisp\\'" . lisp-mode)
:config
(defun chris/start-nyxt-repl ()
"Start the repl and sly connection for nyxt"
"Start the repl and sly connection for nyxt"
(interactive)
(sly-connect "localhost" 4006))
(setq sly-connection-poll-interval 0.1)
(defun sly-critique-file ()
"Lint this file with lisp-critic"
(interactive)
(sly-eval-async '(ql:quickload :lisp-critic))
(sly-eval-async
`(lisp-critic:critique-file ,(buffer-file-name))))
:general
(chris/leader-keys
:states 'normal

14
init.el
View file

@ -1054,7 +1054,8 @@ much faster. The hope is to also make this a faster version of imenu."
:config
(setq org-modern-timestamp nil
org-modern-table nil)
org-modern-table nil
org-modern-star '("" "" "" "" ""))
(custom-set-faces
'(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36")))
@ -3087,9 +3088,18 @@ targets."
("\\.lisp\\'" . lisp-mode)
:config
(defun chris/start-nyxt-repl ()
"Start the repl and sly connection for nyxt"
"Start the repl and sly connection for nyxt"
(interactive)
(sly-connect "localhost" 4006))
(setq sly-connection-poll-interval 0.1)
(defun sly-critique-file ()
"Lint this file with lisp-critic"
(interactive)
(sly-eval-async '(ql:quickload :lisp-critic))
(sly-eval-async
`(lisp-critic:critique-file ,(buffer-file-name))))
:general
(chris/leader-keys
:states 'normal