tweaks to org and sly
This commit is contained in:
parent
de803b699a
commit
73ca11bef7
16
README.org
16
README.org
|
@ -1413,7 +1413,8 @@ Org-Superstar makes the stars at the beginning of the line in =org-mode= a lot p
|
||||||
:config
|
:config
|
||||||
|
|
||||||
(setq org-modern-timestamp nil
|
(setq org-modern-timestamp nil
|
||||||
org-modern-table nil)
|
org-modern-table nil
|
||||||
|
org-modern-star '("◉" "○" "◈" "◇" "✳"))
|
||||||
|
|
||||||
(custom-set-faces
|
(custom-set-faces
|
||||||
'(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36")))
|
'(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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"))
|
gptel-api-key "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"))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
#+begin_ai
|
|
||||||
is emacs the best?
|
|
||||||
#+end_ai
|
|
||||||
|
|
||||||
*** Ellama
|
*** Ellama
|
||||||
Idk, let's try this i guess
|
Idk, let's try this i guess
|
||||||
|
|
||||||
|
@ -4195,6 +4192,15 @@ Using sly makes a lot better common-lisp interaction within emacs.
|
||||||
"Start the repl and sly connection for nyxt"
|
"Start the repl and sly connection for nyxt"
|
||||||
(interactive)
|
(interactive)
|
||||||
(sly-connect "localhost" 4006))
|
(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
|
:general
|
||||||
(chris/leader-keys
|
(chris/leader-keys
|
||||||
:states 'normal
|
:states 'normal
|
||||||
|
|
12
init.el
12
init.el
|
@ -1054,7 +1054,8 @@ much faster. The hope is to also make this a faster version of imenu."
|
||||||
:config
|
:config
|
||||||
|
|
||||||
(setq org-modern-timestamp nil
|
(setq org-modern-timestamp nil
|
||||||
org-modern-table nil)
|
org-modern-table nil
|
||||||
|
org-modern-star '("◉" "○" "◈" "◇" "✳"))
|
||||||
|
|
||||||
(custom-set-faces
|
(custom-set-faces
|
||||||
'(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36")))
|
'(org-modern-tag ((t :background "#9aedfe" :foreground "#282a36")))
|
||||||
|
@ -3090,6 +3091,15 @@ targets."
|
||||||
"Start the repl and sly connection for nyxt"
|
"Start the repl and sly connection for nyxt"
|
||||||
(interactive)
|
(interactive)
|
||||||
(sly-connect "localhost" 4006))
|
(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
|
:general
|
||||||
(chris/leader-keys
|
(chris/leader-keys
|
||||||
:states 'normal
|
:states 'normal
|
||||||
|
|
Loading…
Reference in a new issue