diff options
| -rw-r--r-- | init-el.org | 25 |
1 files changed, 17 insertions, 8 deletions
diff --git a/init-el.org b/init-el.org index 5189b96..42214db 100644 --- a/init-el.org +++ b/init-el.org @@ -680,6 +680,7 @@ LOAD-THEME" (setq my-installed-themes '( + ef-themes plan9-theme poet-theme yoshi-theme @@ -728,17 +729,13 @@ coding themese. I set whichever themeset I feel like writing in.") grandshell naga)) -(setq *kaolin-themes* - (themes-in-package 'kaolin)) +(setq *ef-themes* (themes-in-package 'ef)) - -(setf *coding-themes* *singular-themes*) +(setf *coding-themes* (append *singular-themes* *ef-themes*)) (setq *writing-themes* (themes-in-package 'poet)) - - -(setq *current-theme-set* *singular-themes*) +(setq *current-theme-set* *coding-themes*) (when (car custom-enabled-themes) (disable-theme (car custom-enabled-themes))) @@ -844,7 +841,11 @@ stand up and move around. (add-to-list 'org-capture-templates '("j" "Journal" entry (file+olp+datetree "~/notes/circadian.org.cpt") - ""))) + "")) + (add-to-list 'org-capture-templates + '("i" "Inbox" entry + (file+headline "~/notes/deft/Planner.org" "INBOX") + ""))) #+end_src @@ -1010,6 +1011,9 @@ imenu-list displayes imenu results in a a navigable table-of-contents tree-like (setq elfeed-feeds '(("https://harpers.org/feed" culture politics news) ("https://scottaaronson.blog/?feed=rss2" quantum blog science) + ("https://antirez.com/rss" blog) + ("https://cdn.jwz.org/blog/feed/" blog) + ("https://wingolog.org/feed/atom" blog) ("http://thetarpit.org/2024/simplicity-and-ease/feed" lisp blog) ("http://planet.lisp.org/rss20.xml" lisp blog) ("https://theconvivialsociety.substack.com/feed" technology culture philosophy) @@ -1419,6 +1423,8 @@ association one shell with each perspective layout #+name: sly-config #+begin_src elisp :noweb no-export +(require 'sly) + (defun my-sly-invocation-command () (interactive) (if (sly-connected-p) @@ -1435,6 +1441,9 @@ association one shell with each perspective layout '((?d "[d]ocumentation" sly-describe-symbol) (?h "[h]yperspec" hyperspec-lookup) (?S "[S]ync package" sly-mrepl-sync) + (?s "[s]ticker dwim" sly-stickers-dwim) + (?r "[r]eplay stickers" sly-stickers-replay) + (?f "[f]orget stickers" sly-stickers-forget) (?\t "TAB inpsect" sly-inspect))) (setq sly-lisp-implementations |