Please, add the ability to fontify code inside #+BEGIN_LATEX ... #+END_LATEX
blocks. Embedded LaTeX doesn't get native fontification and SRC blocks aren't the place to just get fancy colors (besides, latex inline preview doesn't work for them). Currently there is this trick: #+BEGIN_LATEX latex ... #+END_LATEX which is a bit redundant. I propose to add a new option or to just fontify LATEX blocks if fontification is enabled for latex SRC blocks. (I prefer the second alternative but maybe there is a reason to keep both options separated). Thanks. --- Emacs : GNU Emacs 26.1.50 (build 13, x86_64-pc-linux-gnu, GTK+ Version 3.24.1) of 2018-10-25 Package: Org mode version 9.1.9 (release_9.1.9-65-g5e4542 @ /home/carlos/local/stow/emacs-26/share/emacs/26.1.50/lisp/org/) current state: ============== (setq org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer) org-fontify-whole-heading-line t org-after-todo-state-change-hook '(org-clock-out-if-current) org-metadown-hook '(org-babel-pop-to-session-maybe) org-clock-out-hook '(org-clock-remove-empty-clock-drawer) org-refile-targets '((nil :maxlevel . 2) (("gtd.org" "diario.org") :maxlevel . 2)) org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function org-agenda-files '("gtd.org" "inbox.org" "phone.org" "tablet.org") org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default org-reveal-start-hook '(org-decrypt-entry) org-mode-hook '((lambda nil (let* ((in-goto (string= (buffer-name) "*org-goto*")) (in-notes (string-prefix-p (expand-file-name "~/notes/") buffer-file-name)) (note-name (and in-notes (file-name-base buffer-file-name)))) (if in-notes (progn (org-indent-mode) (auto-revert-mode))) (if (string= note-name "inbox") (progn (set (make-local-variable (quote auto-save-timeout)) 10) (auto-save-visited-mode))) (if (or in-goto (member note-name (quote ("inbox" "tablet" "phone")))) (progn (let ((--dolist-tail-- (quote (org-level-1 org-level-2 org-level-3 org-level-4 org-level-5))) face) (while --dolist-tail-- (setq face (car --dolist-tail--)) (face-remap-add-relative face :inherit (quote default)) (setq --dolist-tail-- (cdr --dolist-tail--))) ) ) ) (add-hook (quote completion-at-point-functions) (quote pcomplete-completions-at-point) nil t)) ) #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-block-all append local] 5] #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-babel-show-result-all append local] 5] org-babel-result-hide-spec org-babel-hide-all-hashes) org-archive-hook '(org-attach-archive-delete-maybe) org-confirm-elisp-link-function 'yes-or-no-p org-agenda-before-write-hook '(org-agenda-add-entry-text) org-metaup-hook '(org-babel-load-in-session-maybe) org-bibtex-headline-format-function #[257 "\300.\236A\207" [:title] 3 "\n\n(fn ENTRY)"] org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"] org-agenda-deadline-faces '((1.001 . error) (1.0 . org-warning) (0.5 . org-upcoming-deadline) (0.0 . org-upcoming-distant-deadline)) org-babel-pre-tangle-hook '(save-buffer) org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand) org-hide-leading-stars t org-babel-load-languages '((emacs-lisp . t) (python . t)) org-link-abbrev-alist '(("google" . "https://www.google.com/#q=") ("docs" . my-find-in-docs)) org-export-backends '(ascii beamer html latex md) org-highlight-latex-and-related '(latex script entities) org-ascii-format-drawer-function #[771 ".\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"] org-babel-python-command "ipython -i --simple-prompt --matplotlib=agg" org-fontify-quote-and-verse-blocks t org-fontify-done-headline t org-occur-hook '(org-first-headline-recenter) org-cycle-separator-lines 1 org-footnote-auto-adjust t org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines org-optimize-window-after-visibility-change) org-todo-keywords '((sequence "TODO(t)" "SOMEDAY(s)" "|" "DONE(d)")) org-speed-command-hook '(org-speed-command-activate org-babel-speed-command-activate) org-babel-tangle-lang-exts '(("python" . "py") ("emacs-lisp" . "el") ("elisp" . "el")) org-format-latex-options '(:foreground default :background default :scale 1.3 :html-foreground "Black" :html-background "Transparent" :html-scale 1.0 :matchers ("begin" "$1" "$" "$$" "\\(" "\\[")) org-refile-use-outline-path t org-font-lock-set-keywords-hook '(doom-org-custom-fontification) org-confirm-shell-link-function 'yes-or-no-p org-stuck-projects '("-someday+LEVEL=2/-DONE" ("TODO") nil "") org-link-parameters '(("id" :follow org-id-open) ("rmail" :follow org-rmail-open :store org-rmail-store-link) ("mhe" :follow org-mhe-open :store org-mhe-store-link) ("irc" :follow org-irc-visit :store org-irc-store-link) ("info" :follow org-info-open :export org-info-export :store org-info-store-link) ("gnus" :follow org-gnus-open :store org-gnus-store-link) ("docview" :follow org-docview-open :export org-docview-export :store org-docview-store-link) ("bibtex" :follow org-bibtex-open :store org-bibtex-store-link) ("bbdb" :follow org-bbdb-open :export org-bbdb-export :complete org-bbdb-complete-link :store org-bbdb-store-link) ("w3m" :store org-w3m-store-link) ("file+sys") ("file+emacs") ("doi" :follow org--open-doi-link) ("elisp" :follow org--open-elisp-link) ("file" :complete org-file-complete-link) ("ftp" :follow (lambda (path) (browse-url (concat "ftp:" path)))) ("help" :follow org--open-help-link) ("http" :follow (lambda (path) (browse-url (concat "http:" path)))) ("https" :follow (lambda (path) (browse-url (concat "https:" path)))) ("mailto" :follow (lambda (path) (browse-url (concat "mailto:" path)))) ("news" :follow (lambda (path) (browse-url (concat "news:" path)))) ("shell" :follow org--open-shell-link)) org-latex-format-headline-function 'org-latex-format-headline-default-function org-capture-templates '(("i" "Inbox Note" entry (file "inbox.org") "* %?" :empty-lines 1) ("p" "Protocol Link" entry (file "inbox.org") "* %:description\n\n%:link\n\n%i%?" :empty-lines 1) ("L" "Protocol Link" entry (file "inbox.org") "* %:description\n\n%:link%?" :empty-lines 1)) org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"] org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) ("article" "\\documentclass[11pt]{article}" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" . "\\subparagraph*{%s}")) ("report" "\\documentclass[11pt]{report}" ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) ("book" "\\documentclass[11pt]{book}" ("\\part{%s}" . "\\part*{%s}") ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) ) org-html-format-headline-function 'org-html-format-headline-default-function org-confirm-babel-evaluate nil org-directory "~/notes" org-preview-latex-image-directory "/tmp/ltximg/" )