From 742db3be4673d455ae1ce652874750ad54cd4d2f Mon Sep 17 00:00:00 2001 From: colin Date: Fri, 24 Nov 2023 17:17:44 -0800 Subject: rss feeds; themes; company + slime is fucked --- init-el.org | 55 +++++++++++++++++++++++++++++++++++++++---------------- 1 file changed, 39 insertions(+), 16 deletions(-) diff --git a/init-el.org b/init-el.org index 737072b..c085b22 100644 --- a/init-el.org +++ b/init-el.org @@ -660,7 +660,7 @@ e.g. here's one for org capture (package-install 'autothemer) ;; for custom themes (setq my-installed-themes - '(yoshi-theme leuven-theme zweilight-theme)) + '(yoshi-theme leuven-theme zweilight-theme cybercafe-theme seoul256-theme)) (dolist (package my-installed-themes) @@ -764,7 +764,7 @@ LOAD-THEME" #+begin_src elisp :noweb no-export :results none (setq *coding-themes* - (append '(leuven yoshi leuven-dark zweilight))) + (append '(leuven seoul256 yoshi leuven-dark zweilight cybercafe))) (setq *writing-themes* (themes-in-package 'poet)) @@ -1034,23 +1034,27 @@ imenu-list displayes imenu results in a a navigable table-of-contents tree-like (setq elfeed-feeds '( + ("https://www.n16f.net/blog/index.xml" blog programming emacs lisp) + ("https://deprogrammaticaipsum.com/rss" programming blog) + ("https://www.okdoomer.io/latest/rss" blog rant sus) + ("https://abuseofnotation.github.io/feed" blog philosophy programming) ("https://whhone.com/index.xml" blog emacs) ("https://feedly.com/i/subscription/feed/https://www.cold-takes.com/rss/" blog ) ("https://www.construction-physics.com/feed" science blog) - ("https://economicsfromthetopdown.com/feed" blog economics science) + ("https://economicsfromthetopdown.com/feed" blog economics science) ("https://newsletter.aworkinglibrary.com/rss" culture technology) - ("https://harpers.org/feed" culture politics news) + ("https://harpers.org/feed" culture politics news) ("https://solar.lowtechmagazine.com/posts/index.xml" technology) - ("https://lambdaland.org/index.xml" blog lisp emacs) + ("https://lambdaland.org/index.xml" blog lisp emacs) ("https://warandpeas.com/feed" comics) ("http://planet.lisp.org/rss20.xml" lisp blog) - ("http://feeds.feedburner.com/FutilityCloset" art culture) + ("https://feeds.feedburner.com:443/dailykos/zyrjlhwgaef" politics news) ("http://feeds2.feedburner.com/NoTechMagazine" technology) ("http://www.thingsmagazine.net/feed" art culture) ("https://commonstransition.org/feed/" commons p2p) - ("http://blog.p2pfoundation.net/feed/" p2p activism research) + ("http://blog.p2pfoundation.net/feed/" p2p activism research) ("https://www.noemamag.com/feed" culture technology) - ("https://theconvivialsociety.substack.com/feed" technology culture philosophy) + ("https://theconvivialsociety.substack.com/feed" technology culture philosophy) ("https://daily.jstor.org/feed" news) ("https://www.merriam-webster.com/wotd/feed/rss2" wordoday) ("https://www.viruscomix.com/rss.xml" comics) @@ -1059,10 +1063,10 @@ imenu-list displayes imenu results in a a navigable table-of-contents tree-like ("https://existentialcomics.com/rss.xml" comics) ("http://feeds.feedburner.com/OddityCentral" weird) ("https://journal.stuffwithstuff.com/rss.xml" programming blog) - ("https://rss.slashdot.org/Slashdot/slashdotMain" tech news))) + ("https://rss.slashdot.org/Slashdot/slashdotMain" tech news))) -(setq-default elfeed-search-filter "@1-weeks-ago +unread") +(setq-default elfeed-search-filter "@2-weeks-ago +unread") #+end_src @@ -1350,8 +1354,9 @@ code in emacs org blocks. #+name: company #+begin_src elisp :results none -(package-install 'company) -(add-hook 'after-init-hook 'global-company-mode) +;(package-install 'company) +;(add-hook 'after-init-hook 'global-company-mode) + ;; (setq company-frontends ;; '(company-pseudo-tooltip-unless-just-one-frontend @@ -1398,7 +1403,8 @@ association one shell with each perspective layout (package-install 'paredit) (package-install 'slime) -(package-install 'slime-company) +;(package-install 'slime-company) + @@ -1498,10 +1504,12 @@ from debian contrib #+name: common-lisp-editing-config #+begin_src elisp :results none -(slime-setup '(slime-fancy slime-company slime-fuzzy slime-asdf )) +;; (slime-setup '(slime-fancy ;slime-company +;; slime-fuzzy slime-asdf +;; )) -(setq slime-company-completion 'fuzzy - slime-company-after-completion 'slime-company-just-one-space) +;; (setq slime-company-completion 'fuzzy +;; slime-company-after-completion 'slime-company-just-one-space) (autoload 'enable-paredit-mode "paredit" "Turn on pseudo-structural editing of Lisp code." t) (add-hook 'emacs-lisp-mode-hook #'enable-paredit-mode) @@ -1530,6 +1538,12 @@ from debian contrib (add-hook 'lisp-mode-hook 'linum-mode) +;; The default imenu matcher is defined in the variable +;; lisp-imenu-generic-expression as part of lisp-mode.el. I extend +;; that definition here to treat anything that begins with ="def"= as +;; a match. + + (setq +common-lisp-package-template+ " @@ -1569,6 +1583,15 @@ from debian contrib #+RESULTS: slime-tweaks : slime-random-words-of-encouragement +*** LISP-MODE tweaks + + +#+name: lisp-mode-tweaks +#+begin_src elisp :noweb no-export + +#+end_src + + *** Coalton -- cgit v1.2.3