[O] Bug: code block export [9.0 (9.0-elpaplus @ /home/mcg/.emacs.d/elpa/org-plus-contrib-20161102/)]

[mcg]

Hello,

I recently (max 3 weeks) noticed that latex code blocks are not exported
correctly anymore:

#+BEGIN_LaTeX

#+END_LaTeX

Export is:

\begin{LaTeX}

\end{LaTeX}

I do not recall having changed any setup.



Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org mailing list.
------------------------------------------------------------------------




Emacs  : GNU Emacs 24.4.1 (x86_64-pc-linux-gnu, GTK+ Version 3.14.5)
 of 2015-03-07 on trouble, modified by Debian
Package: Org mode version 9.0 (9.0-elpaplus @ /home/mcg/.emacs.d/elpa/org-plus-contrib-20161102/)

current state:
==============
(setq
 org-export-with-todo-keywords nil
 org-export-backends '(ascii html icalendar latex freemind koma-letter)
 org-latex-tables-booktabs t
 org-latex-default-figure-position "!htbp"
 org-ref-get-pdf-filename-function 'org-ref-get-pdf-filename
 org-footnote-auto-adjust t
 org-tab-first-hook '(org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 org-adapt-indentation nil
 org-latex-classes '(("article"
              "\\documentclass[11pt,twoside,pointlessnumbers,headsepline]{scrartcl}\n[DEFAULT-PACKAGES]\n[PACKAGES]\n\n\\hypersetup{%\ncolorlinks   = false, %Colours links instead of ugly boxes\nlinkbordercolor=blue, %hyperlink borders will be blue\nurlcolor     = blue, %Colour for external hyperlinks\nlinkcolor    = red, %Colour of internal links\ncitecolor   = brown, %Colour of citations\ncitebordercolor = brown, %Colour of citations\npdfborderstyle={/S/U/W 0.5} %border style will be underline of width 0.5pt\n}\n\n\n[EXTRA]   \n"
              ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}")
              ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}")
              ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
             ("default-koma-letter" "\\documentclass[11pt]{scrlttr2}")
             ("letter"
              "\\documentclass{scrlttr2}\n        [DEFAULT-PACKAGES]\n        [NO-PACKAGES]        ")
             ("minimalRnw" "\\documentclass{scrartcl}\n[NO-DEFAULT-PACKAGES]\n\\usepackage{hyperref}"
              ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}")
              ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}")
              ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
             ("beamer" "\\documentclass[presentation]{beamer}" ("\\section{%s}" . "\\section*{%s}")
              ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
             ("report" "\\documentclass[11pt]{scrreprt}" ("\\part{%s}" . "\\part*{%s}")
              ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}")
              ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
             ("book" "\\documentclass[11pt]{scrbook}" ("\\part{%s}" . "\\part*{%s}")
              ("\\chapter{%s}" . "\\chapter*{%s}") ("\\section{%s}" . "\\section*{%s}")
              ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
             )
 org-footnote-section nil
 org-calc-default-modes '(calc-internal-prec 12 calc-float-format (float 5) calc-angle-mode deg calc-prefer-frac
              nil calc-symbolic-mode nil calc-date-format (YYYY "-" MM "-" DD " " Www (" " hh ":" mm))
              calc-display-working-message t)
 org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
 org-export-with-timestamps nil
 org-agenda-diary-file "~/org/diary.org"
 org-ref-pdf-directory "~/library/link/"
 org-occur-hook '(org-first-headline-recenter)
 org-src-tab-acts-natively t
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-agenda-start-on-weekday nil
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-format-latex-options '(:foreground default :background "White" :scale 1.2 :html-foreground "Black"
                :html-background "Transparent" :html-scale 1.0 :matchers
                ("begin" "$1" "$" "$$" "\\(" "\\["))
 org-src-window-setup 'current-window
 org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-ref-cite-types '("citep" "autocite" "citealp" "citet" "citet*" "cite" "citep*" "citeauthor" "citeauthor*"
              "citeyear" "nocite" "citetext")
 org-ref-open-pdf-function 'org-ref-open-pdf-at-point
 org-ref-cite-onclick-function 'org-ref-helm-cite-click
 org-time-stamp-custom-formats '("<%d.%m.%Y>" . "<%d.%m.%y %a %H:%M>")
 org-latex-pdf-process '("latexmk -f -pdf %f")
 org-latex-text-markup-alist '((bold . "\\textbf{%s}") (code . protectedtexttt) (italic . "\\textit{%s}")
                   (strike-through . "\\sout{%s}") (underline . "\\uline{%s}")
                   (verbatim . protectedtexttt))
 org-ref-insert-label-function 'org-ref-helm-insert-label-link
 org-export-date-timestamp-format "%d.%m.%Y"
 org-ref-default-bibliography '("~/library/bib/adjuvants.bib" "~/library/bib/allelopathy.bib")
 org-file-apps '((auto-mode . emacs) ("\\.mm\\'" . default) ("\\.x?html?\\'" . "chromium %s")
         ("\\.pdf\\'" . "evince %s"))
 org-emphasis-alist '(("*" bold) ("/" italic) ("_" underline) ("=" org-verbatim verbatim) ("~" org-code verbatim))
 org-shiftleft-hook '(#[nil "\300\301!\207" [org-ref-swap-citation-link -1] 2])
 org-agenda-skip-scheduled-if-done t
 org-freemind-pretty-output t
 org-agenda-custom-commands '(("W" "Weekly Review"
                   ((agenda "" ((org-agenda-ndays 7))) (stuck "") (todo "PROJECT") (todo "MAYBE")
                (todo "WAITING"))
                   )
                  )
 org-ref-bibliography-notes "~/library/notes.org"
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-default-notes-file "~/org/gtd.org"
 org-latex-image-default-width ""
 org-ref-default-citation-link "citep"
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn ## CONTENTS)"]
 org-from-is-user-regexp "\\<mcg\\>"
 org-koma-letter-opening nil
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '((lambda nil (local-set-key (kbd "M-h") (quote beginning-of-visual-line))
          (local-set-key (kbd "M-ö") (quote end-of-visual-line))
          (local-set-key (kbd "M-a") (quote backward-kill-visual-line))
          (local-set-key (kbd "M-g") (quote kill-visual-line))
          (local-set-key (kbd "M-e") (quote backward-kill-word))
          (local-set-key (kbd "M-s") (quote kill-whole-line))
          (local-set-key (kbd "C-c )") (quote org-ref-helm-insert-cite-link))
          (local-set-key (kbd "C-c (") (quote org-ref-helm-insert-ref-link)))
         turn-on-font-lock (lambda nil (local-set-key (kbd "M-'") (quote org-mark-ring-goto)))
         (lambda nil (local-set-key (kbd "H-<") (quote my-org-toggle-current-block)))
         (lambda nil (local-set-key (kbd "<f7>") (quote org-edit-src-code-))) org-ref-org-menu
         #[0 "\300\301\302\303#\207"
           [font-lock-add-keywords nil ((or-next-acronym-link (0 (quote org-ref-acronym-face) t))) t] 4
           "\n\n(fn)"]
         #[0 "\300\301\302\303#\207"
           [font-lock-add-keywords nil ((or-next-glossary-link (0 (quote org-ref-glossary-face) t))) t] 4
           "\n\n(fn)"]
         #[0 "\300\301\302\303\304$\207" [add-hook change-major-mode-hook org-show-block-all append local]
           5 "\n\n(fn)"]
         #[0 "\300\301\302\303\304$\207"
           [add-hook change-major-mode-hook org-babel-show-result-all append local] 5 "\n\n(fn)"]
         org-babel-result-hide-spec org-babel-hide-all-hashes turn-on-flyspell org-eldoc-load)
 org-ref-insert-cite-function 'org-ref-helm-cite
 org-latex-prefer-user-labels t
 org-format-latex-header "\\documentclass{scrartcl}\n\\usepackage[usenames]{color}\n[PACKAGES]\n[DEFAULT-PACKAGES]\n\\pagestyle{empty}             % do not remove\n% The settings below are copied from fullpage.sty\n\\setlength{\\textwidth}{\\paperwidth}\n\\addtolength{\\textwidth}{-3cm}\n\\setlength{\\oddsidemargin}{1.5cm}\n\\addtolength{\\oddsidemargin}{-2.54cm}\n\\setlength{\\evensidemargin}{\\oddsidemargin}\n\\setlength{\\textheight}{\\paperheight}\n\\addtolength{\\textheight}{-\\headheight}\n\\addtolength{\\textheight}{-\\headsep}\n\\addtolength{\\textheight}{-\\footskip}\n\\addtolength{\\textheight}{-3cm}\n\\setlength{\\topmargin}{1.5cm}\n\\addtolength{\\topmargin}{-2.54cm}"
 org-latex-caption-above '(table special-block)
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-ascii-format-drawer-function #[771 "
\207" [] 4 "\n\n(fn NAME CONTENTS WIDTH)"]
 org-ref-completion-library 'org-ref-helm-cite
 org-ref-insert-ref-function 'org-ref-helm-insert-ref-link
 org-enforce-todo-dependencies 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-koma-letter-prefer-subject t
 org-ref-bibtex-assoc-pdf-with-entry-move-function 'rename-file
 org-export-before-parsing-hook '(org-latex-header-blocks-filter)
 org-enforce-todo-checkbox-dependencies t
 org-ref-clean-bibtex-key-function '(lambda (key) (replace-regexp-in-string ":" "" key))
 org-blank-before-new-entry '((heading . t) (plain-list-item))
 org-todo-keywords '((sequence "TODO" "IN-PROGRESS" "CANCELLED" "DONE"))
 org-ref-clean-bibtex-entry-hook '(orcb-key-comma org-ref-replace-nonascii orcb-& orcb-%
                   org-ref-title-case-article orcb-clean-year orcb-key orcb-clean-doi
                   orcb-clean-pages org-ref-sort-bibtex-entry)
 org-agenda-window-setup 'current-window
 org-koma-letter-default-class "letter"
 org-latex-packages-alist '(("" "nth" nil) ("" "enumitem" nil) "" ("" "subcaption" nil) ("" "multirow" nil)
                ("" "natbib" nil) ("" "booktabs" nil) ("" "authblk" nil) ("" "afterpage" nil)
                ("" "makeidx" nil) ("" "tikz" nil) ("" "chemmacros" nil) ("" "siunitx" nil)
                ("" "chngcntr" nil) "\\counterwithin{figure}{section}"
                "\\counterwithin{table}{section}")
 org-catch-invisible-edits 'show
 org-export-allow-bind-keywords t
 org-ctrl-k-protect-subtree t
 org-babel-tangle-lang-exts '(("latex" . "tex") ("python" . "py") ("emacs-lisp" . "el") ("elisp" . "el"))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-edit-src-content-indentation 0
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-shiftright-hook '(#[nil "\300\301!\207" [org-ref-swap-citation-link 1] 2])
 org-blocker-hook '(org-block-todo-from-checkboxes org-block-todo-from-children-or-siblings-or-parent)
 org-ref-open-notes-function '(lambda nil (org-show-entry) (show-branches) (show-children)
                   (org-cycle (quote (64))) (recenter-top-bottom 0))
 org-koma-letter-class-option-file "DIN"
 org-agenda-skip-deadline-if-done t
 org-html-format-headline-function 'org-html-format-headline-default-function
 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)
               ("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)
               ("printindex" :follow org-ref-index :export
            #[(path desc format) "\301=\205