diff options
Diffstat (limited to 'init-el.org')
| -rw-r--r-- | init-el.org | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/init-el.org b/init-el.org index 87efd81..cce3742 100644 --- a/init-el.org +++ b/init-el.org @@ -39,6 +39,8 @@ (insert-file-contents f) (buffer-string))) +(defun middle-of-list (xs) + (elt xs (/ (length xs) 2))) #+end_src @@ -414,7 +416,7 @@ e.g. here's one for org capture javascript:location.href='org-protocol://capture:/w/'+encodeURIComponent(location.href)+'/'+encodeURIComponent(document.title)+'/'+encodeURIComponent(window.getSelection()) #+end_src -** Bells and Whistles +** COMMENT Bells and Whistles #+name: org-bells-and-wistles #+begin_src elisp :results none @@ -433,8 +435,8 @@ e.g. here's one for org capture #+name: ui-fonts #+begin_src elisp :noweb no-export (add-to-list 'default-frame-alist - '(font . "Comic Mono-12") - ;'(font . "Victor Mono-10") + '(font . "Comic Mono-18") + ;'(font . "Victor Mono-10") ;; uhh ) @@ -641,7 +643,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 cybercafe-theme seoul256-theme)) + '(yoshi-theme leuven-theme seoul256-theme warm-night-theme nimbus-theme doom-themes)) (dolist (package my-installed-themes) @@ -745,7 +747,8 @@ LOAD-THEME" #+begin_src elisp :noweb no-export :results none (setq *coding-themes* - (append '(leuven seoul256 yoshi leuven-dark zweilight cybercafe))) + (append '(leuven seoul256 yoshi nimbus warm-night) + (themes-in-package 'doom))) (setq *writing-themes* (themes-in-package 'poet)) @@ -754,7 +757,7 @@ LOAD-THEME" (when (car custom-enabled-themes) (disable-theme (car custom-enabled-themes))) -(load-theme (first *current-theme-set*) t) +(load-theme (middle-of-list *current-theme-set*) t) @@ -1029,7 +1032,6 @@ imenu-list displayes imenu results in a a navigable table-of-contents tree-like ("https://lambdaland.org/index.xml" blog lisp emacs) ("https://warandpeas.com/feed" comics) ("http://planet.lisp.org/rss20.xml" lisp blog) - ("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) @@ -1043,8 +1045,7 @@ imenu-list displayes imenu results in a a navigable table-of-contents tree-like ("https://www.science.org/blogs/pipeline/feed" science news) ("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://journal.stuffwithstuff.com/rss.xml" programming blog))) (setq-default elfeed-search-filter "@2-weeks-ago +unread") @@ -1335,9 +1336,8 @@ 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) @@ -1386,7 +1386,7 @@ association one shell with each perspective layout (package-install 'paredit) (package-install 'slime) -;(package-install 'slime-company) +(package-install 'slime-company) @@ -1488,12 +1488,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) (package-install 'ac-slime) (require 'ac-slime) |