Don't fontify org-src blocks natively

Just use blue foreground to show it as a block

diff --git a/config.org b/config.org
index 035cb9d0a3de6172a112f0884994befd2a6ac86f..5917a5e13ef13aa748c631c08b977efd557797c6 100644 (file)
--- a/config.org
+++ b/config.org
@@ -230,37 +230,38 @@ Sly really doesn't play well with elodc in the minibuffer, so here are some sett
 ** Configuration
 *** General options
 #+BEGIN_SRC emacs-lisp
-  (with-eval-after-load 'org-mode (add-to-list 'org-export-backends 'md))
-
-  (setq org-startup-indented nil
-       org-indent-indentation-per-level tab-width
-       org-startup-folded 'fold
-       org-startup-with-inline-images t
-       org-cycle-inline-images-display t
-       org-cycle-separator-lines 0
-       org-blank-before-new-entry '((heading) (plain-list-item . auto))
-       org-M-RET-may-split-line nil
-       org-treat-S-cursor-todo-selection-as-state-change nil
-       org-treat-insert-todo-heading-as-state-change nil
-       org-table-export-default-format "orgtbl-to-csv"
-       org-list-allow-alphabetical t
-       org-fold-catch-invisible-edits 'show-and-error
-       org-ellipsis "↴"
-       org-tags-column 0
-       org-reverse-note-order t
-       org-enforce-todo-dependencies t
-       org-enforce-todo-checkbox-dependencies t
-       org-fontify-done-headline nil
-       org-fontify-todo-headline nil
-       org-goto-interface 'outline-path-completion
-       org-outline-path-complete-in-steps nil
-       org-goto-auto-isearch nil
-       org-special-ctrl-a/e t
-       org-special-ctrl-k t
-       org-return-follows-link t
-       org-yank-adjusted-subtrees t
-       org-src-window-setup 'current-window
-       org-src-preserve-indentation t)
+(with-eval-after-load 'org-mode (add-to-list 'org-export-backends 'md))
+
+(setq org-startup-indented nil
+      org-indent-indentation-per-level tab-width
+      org-startup-folded 'fold
+      org-startup-with-inline-images t
+      org-cycle-inline-images-display t
+      org-cycle-separator-lines 0
+      org-blank-before-new-entry '((heading) (plain-list-item . auto))
+      org-M-RET-may-split-line nil
+      org-treat-S-cursor-todo-selection-as-state-change nil
+      org-treat-insert-todo-heading-as-state-change nil
+      org-table-export-default-format "orgtbl-to-csv"
+      org-list-allow-alphabetical t
+      org-fold-catch-invisible-edits 'show-and-error
+      org-ellipsis "↴"
+      org-tags-column 0
+      org-reverse-note-order t
+      org-enforce-todo-dependencies t
+      org-enforce-todo-checkbox-dependencies t
+      org-fontify-done-headline nil
+      org-fontify-todo-headline nil
+      org-src-fontify-natively nil
+      org-goto-interface 'outline-path-completion
+      org-outline-path-complete-in-steps nil
+      org-goto-auto-isearch nil
+      org-special-ctrl-a/e t
+      org-special-ctrl-k t
+      org-return-follows-link t
+      org-yank-adjusted-subtrees t
+      org-src-window-setup 'current-window
+      org-src-preserve-indentation t)
 #+END_SRC
 *** Time Clocking
 #+BEGIN_SRC emacs-lisp

diff --git a/themes/eng-paper-theme.el b/themes/eng-paper-theme.el
index 867d74acfcf0d3da53a55008d0d435d4e23bed57..d8327d081737e6339d85ef1c4b404fa515428786 100644 (file)
--- a/themes/eng-paper-theme.el
+++ b/themes/eng-paper-theme.el
@@ -126,6 +126,8 @@
      ((,class (:inherit default))))
    `(org-special-keyword
      ((,class (:foreground ,precaution-blue))))
+   `(org-block
+     ((,class (:foreground ,precaution-blue))))
 ;;; Org Agenda
    `(header-line
      ((,class (:inherit default))))