Compare commits

..

No commits in common. "8e421f8073fe307f6ed578870e33a5727b66373a" and "d2118e8913b8f0a28732f1a285ccad93bca034c0" have entirely different histories.

View file

@ -1,6 +1,7 @@
#+title: Emacs Config #+title: Emacs Config
#+author: Evie Litherland-Smith #+author: Evie Litherland-Smith
#+email: evie@xenia.me.uk #+email: evie@xenia.me.uk
#+filetags: :emacs:config:org:
Personal Emacs configuration. Clone to =~/.config/emacs/= (or Personal Emacs configuration. Clone to =~/.config/emacs/= (or
=~/.emacs.d/=) and install specified plugins. =~/.emacs.d/=) and install specified plugins.
* Config * Config
@ -85,9 +86,6 @@ Configure the look and feel of Emacs
"Load theme and configure some faces." "Load theme and configure some faces."
(require 'base16-theme) (require 'base16-theme)
(load-theme 'base16-one-light t) (load-theme 'base16-one-light t)
(defvar base16-current-theme-colors nil
"Set to `base16-*-theme-colors' for currently selected theme.")
(setq base16-current-theme-colors base16-one-light-theme-colors)
;; Change outline headers to follow rainbow order ;; Change outline headers to follow rainbow order
(require 'outline) (require 'outline)
@ -101,7 +99,7 @@ Configure the look and feel of Emacs
(outline-8 . :base0F))) (outline-8 . :base0F)))
(set-face-attribute (car pairing) nil (set-face-attribute (car pairing) nil
:foreground :foreground
(plist-get base16-current-theme-colors (cdr pairing))))) (plist-get base16-one-light-theme-colors (cdr pairing)))))
(require 'server) (require 'server)
(add-hook 'after-init-hook (add-hook 'after-init-hook
@ -859,11 +857,7 @@ Configure email with iCalendar event support, to integrate with
(set-face-attribute 'org-verbatim nil :inherit 'org-code) (set-face-attribute 'org-verbatim nil :inherit 'org-code)
;; Let quote and verse blocks use variable-pitch font, if configured ;; Let quote and verse blocks use variable-pitch font, if configured
(set-face-attribute 'org-quote nil :inherit 'variable-pitch) (set-face-attribute 'org-quote nil :inherit 'variable-pitch)
(set-face-attribute 'org-verse nil :inherit 'variable-pitch) (set-face-attribute 'org-verse nil :inherit 'variable-pitch))
;; Lighten org-agenda-clocking background to be more legible
(require 'base16-theme)
(set-face-attribute 'org-agenda-clocking nil :background
(plist-get base16-current-theme-colors :base01)))
(use-package org-keys (use-package org-keys
:after org :after org
@ -909,11 +903,6 @@ Configure email with iCalendar event support, to integrate with
(push '(emacs-lisp . t) babel-languages) (push '(emacs-lisp . t) babel-languages)
(org-babel-do-load-languages 'org-babel-load-languages babel-languages))) (org-babel-do-load-languages 'org-babel-load-languages babel-languages)))
(add-to-list 'package-selected-packages 'ob-async)
(use-package ob-async
:if (package-installed-p 'ob-async)
:after ob-code)
(use-package ob-python (use-package ob-python
:after ob-core :after ob-core
:custom :custom
@ -998,7 +987,7 @@ Configure email with iCalendar event support, to integrate with
(org-agenda-todo-ignore-deadlines 'far) (org-agenda-todo-ignore-deadlines 'far)
(org-agenda-clockreport-parameter-plist '(:link t :maxlevel 6 :emphasize t :stepskip0 t :fileskip0 t :filetitle t :properties ("WON"))) (org-agenda-clockreport-parameter-plist '(:link t :maxlevel 6 :emphasize t :stepskip0 t :fileskip0 t :filetitle t :properties ("WON")))
(org-agenda-start-with-clockreport-mode t) (org-agenda-start-with-clockreport-mode t)
(org-agenda-start-with-log-mode t) (org-agenda-start-with-log-mode nil)
(org-agenda-prefix-format '((agenda . " %-12:c%?-12t% s") (org-agenda-prefix-format '((agenda . " %-12:c%?-12t% s")
(todo . " %-12:c") (todo . " %-12:c")
(tags . " %-12:c") (tags . " %-12:c")