[O] [bug?] new latex exporter failing to export

[Yagnesh Raghava Yakkala]

Hello,

I am getting following backtrace when exporting a file to latex (beamer
presentation). where as old exporter is working fine.

--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  string-match("^[      ]*\\[\\(NO-\\)?DEFAULT-PACKAGES\\][     ]*\n?" nil)
  org-splice-latex-header(nil (("AUTO" "inputenc" t) ("T1" "fontenc" t) ("" 
"fixltx2e" nil) ("" "graphicx" t) ("" "longtable" nil) ("" "float" nil) ("" 
"wrapfig" nil) ("" "soul" t) ("" "textcomp" t) ("" "marvosym" t) ("" "wasysym" 
t) ("" "latexsym" t) ("" "amssymb" t) ("" "hyperref" nil) "\\tolerance=1000") 
nil nil nil)
  (org-e-latex--guess-inputenc (org-splice-latex-header document-class-string 
org-export-latex-default-packages-alist org-export-latex-packages-alist nil 
(plist-get info :latex-header-extra)))
  (let* ((header (nth 1 (assoc class org-e-latex-classes))) 
(document-class-string (and (stringp header) (if class-options 
(replace-regexp-in-string "^[        ]*\\\\documentclass\\(\\[.*?\\]\\)" 
class-options header t nil 1) header)))) (org-e-latex--guess-inputenc 
(org-splice-latex-header document-class-string 
org-export-latex-default-packages-alist org-export-latex-packages-alist nil 
(plist-get info :latex-header-extra))))
  (org-element-normalize-string (let* ((header (nth 1 (assoc class 
org-e-latex-classes))) (document-class-string (and (stringp header) (if 
class-options (replace-regexp-in-string "^[  
]*\\\\documentclass\\(\\[.*?\\]\\)" class-options header t nil 1) header)))) 
(org-e-latex--guess-inputenc (org-splice-latex-header document-class-string 
org-export-latex-default-packages-alist org-export-latex-packages-alist nil 
(plist-get info :latex-header-extra)))))
  (let ((class (plist-get info :latex-class)) (class-options (plist-get info 
:latex-class-options))) (org-element-normalize-string (let* ((header (nth 1 
(assoc class org-e-latex-classes))) (document-class-string (and (stringp 
header) (if class-options (replace-regexp-in-string "^[       
]*\\\\documentclass\\(\\[.*?\\]\\)" class-options header t nil 1) header)))) 
(org-e-latex--guess-inputenc (org-splice-latex-header document-class-string 
org-export-latex-default-packages-alist org-export-latex-packages-alist nil 
(plist-get info :latex-header-extra))))))
  (concat (and (plist-get info :time-stamp-file) (format-time-string "%% 
Created %Y-%m-%d %a %H:%M\n")) (let ((class (plist-get info :latex-class)) 
(class-options (plist-get info :latex-class-options))) 
(org-element-normalize-string (let* ((header (nth 1 (assoc class 
org-e-latex-classes))) (document-class-string (and (stringp header) (if 
class-options ... header)))) (org-e-latex--guess-inputenc 
(org-splice-latex-header document-class-string 
org-export-latex-default-packages-alist org-export-latex-packages-alist nil 
(plist-get info :latex-header-extra)))))) 
"\\providecommand{\\alert}[1]{\\textbf{#1}}\n" (let ((sec-num (plist-get info 
:section-numbers))) (when (integerp sec-num) (format 
"\\setcounter{secnumdepth}{%d}\n" sec-num))) (let ((author (and (plist-get info 
:with-author) (let ((auth ...)) (and auth (org-export-data auth info))))) 
(email (and (plist-get info :with-email) (org-export-data (plist-get info 
:email) info)))) (cond ((and author email (not (string= "" email))) (format 
"\\author{%s\\thanks{%s}}\n" author email)) (author (format "\\author{%s}\n" 
author)) (t "\\author{}\n"))) (let ((date (plist-get info :date))) (and date 
(format "\\date{%s}\n" date))) (format "\\title{%s}\n" title) (format 
"\\hypersetup{\n  pdfkeywords={%s},\n  pdfsubject={%s},\n  pdfcreator={%s}}\n" 
(or (plist-get info :keywords) "") (or (plist-get info :description) "") (if 
(not (plist-get info :with-creator)) "" (plist-get info :creator))) 
"\\begin{document}\n\n" (org-element-normalize-string (cond ((string= "" title) 
nil) ((not (stringp org-e-latex-title-command)) nil) ((string-match 
"\\(?:[^%]\\|^\\)%s" org-e-latex-title-command) (format 
org-e-latex-title-command title)) (t org-e-latex-title-command))) (let ((depth 
(plist-get info :with-toc))) (when depth (concat (when (wholenump depth) 
(format "\\setcounter{tocdepth}{%d}\n" depth)) 
"\\tableofcontents\n\\vspace*{1cm}\n\n"))) contents (let ((creator-info 
(plist-get info :with-creator))) (cond ((not creator-info) "") ((eq 
creator-info (quote comment)) (format "%% %s\n" (plist-get info :creator))) (t 
(concat (plist-get info :creator) "\n")))) "\\end{document}")
  (let ((title (org-export-data (plist-get info :title) info))) (concat (and 
(plist-get info :time-stamp-file) (format-time-string "%% Created %Y-%m-%d %a 
%H:%M\n")) (let ((class (plist-get info :latex-class)) (class-options 
(plist-get info :latex-class-options))) (org-element-normalize-string (let* 
((header (nth 1 ...)) (document-class-string (and ... ...))) 
(org-e-latex--guess-inputenc (org-splice-latex-header document-class-string 
org-export-latex-default-packages-alist org-export-latex-packages-alist nil 
(plist-get info :latex-header-extra)))))) 
"\\providecommand{\\alert}[1]{\\textbf{#1}}\n" (let ((sec-num (plist-get info 
:section-numbers))) (when (integerp sec-num) (format 
"\\setcounter{secnumdepth}{%d}\n" sec-num))) (let ((author (and (plist-get info 
:with-author) (let (...) (and auth ...)))) (email (and (plist-get info 
:with-email) (org-export-data (plist-get info :email) info)))) (cond ((and 
author email (not (string= "" email))) (format "\\author{%s\\thanks{%s}}\n" 
author email)) (author (format "\\author{%s}\n" author)) (t "\\author{}\n"))) 
(let ((date (plist-get info :date))) (and date (format "\\date{%s}\n" date))) 
(format "\\title{%s}\n" title) (format "\\hypersetup{\n  pdfkeywords={%s},\n  
pdfsubject={%s},\n  pdfcreator={%s}}\n" (or (plist-get info :keywords) "") (or 
(plist-get info :description) "") (if (not (plist-get info :with-creator)) "" 
(plist-get info :creator))) "\\begin{document}\n\n" 
(org-element-normalize-string (cond ((string= "" title) nil) ((not (stringp 
org-e-latex-title-command)) nil) ((string-match "\\(?:[^%]\\|^\\)%s" 
org-e-latex-title-command) (format org-e-latex-title-command title)) (t 
org-e-latex-title-command))) (let ((depth (plist-get info :with-toc))) (when 
depth (concat (when (wholenump depth) (format "\\setcounter{tocdepth}{%d}\n" 
depth)) "\\tableofcontents\n\\vspace*{1cm}\n\n"))) contents (let ((creator-info 
(plist-get info :with-creator))) (cond ((not creator-info) "") ((eq 
creator-info (quote comment)) (format "%% %s\n" (plist-get info :creator))) (t 
(concat (plist-get info :creator) "\n")))) "\\end{document}"))
  org-e-latex-template("\n\\begin{enumerate}\n\\item 
Templates\n\\label{sec-1}\n\\begin{enumerate}\n\\item with single 
figure\n\\label{sec-1-1}\n\\includegraphics[width=0.10cm]{path/to/fig.jpg}\n\\item
 one fig with bullets\n\\label{sec-1-2}\n\\begin{enumerate}\n\\item 
0.4\n\\label{sec-1-2-1}\n\\begin{itemize}\n\\item bullet one\n\\item bullet 
two\n\\end{itemize}\n\\item 
0.6\n\\label{sec-1-2-2}\n\\includegraphics[width=0.80\\textwidth]{path/to/fig.jpg}\n\\end{enumerate}\n\\item
 two figs\n\\label{sec-1-3}\n\\begin{enumerate}\n\\item 
0.5\n\\label{sec-1-3-1}\n\\includegraphics[width=0.80\\textwidth]{path/to/fig.jpg}\n\\item
 
0.5\n\\label{sec-1-3-2}\n\\includegraphics[width=0.80\\textwidth]{path/to/fig.jpg}\n\\end{enumerate}\n\\end{enumerate}\n\\end{enumerate}\n"
 (:author ("Yagnesh Raghava Yakkala") :creator "Generated by Org mode 7.8.10 in 
Emacs 24.1.50.5." :date "\\today" :description nil :email "address@hidden" 
:exclude-tags ("noexport") :headline-levels 3 :keywords nil :language "en" 
:preserve-breaks nil :section-numbers t :select-tags ("export") 
:time-stamp-file t :title ("Title") :with-archived-trees headline :with-author 
t :with-clocks nil :with-creator comment :with-drawers t :with-email nil 
:with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t 
:with-plannings nil ...))
  funcall(org-e-latex-template "\n\\begin{enumerate}\n\\item 
Templates\n\\label{sec-1}\n\\begin{enumerate}\n\\item with single 
figure\n\\label{sec-1-1}\n\\includegraphics[width=0.10cm]{path/to/fig.jpg}\n\\item
 one fig with bullets\n\\label{sec-1-2}\n\\begin{enumerate}\n\\item 
0.4\n\\label{sec-1-2-1}\n\\begin{itemize}\n\\item bullet one\n\\item bullet 
two\n\\end{itemize}\n\\item 
0.6\n\\label{sec-1-2-2}\n\\includegraphics[width=0.80\\textwidth]{path/to/fig.jpg}\n\\end{enumerate}\n\\item
 two figs\n\\label{sec-1-3}\n\\begin{enumerate}\n\\item 
0.5\n\\label{sec-1-3-1}\n\\includegraphics[width=0.80\\textwidth]{path/to/fig.jpg}\n\\item
 
0.5\n\\label{sec-1-3-2}\n\\includegraphics[width=0.80\\textwidth]{path/to/fig.jpg}\n\\end{enumerate}\n\\end{enumerate}\n\\end{enumerate}\n"
 (:author ("Yagnesh Raghava Yakkala") :creator "Generated by Org mode 7.8.10 in 
Emacs 24.1.50.5." :date "\\today" :description nil :email "address@hidden" 
:exclude-tags ("noexport") :headline-levels 3 :keywords nil :language "en" 
:preserve-breaks nil :section-numbers t :select-tags ("export") 
:time-stamp-file t :title ("Title") :with-archived-trees headline :with-author 
t :with-clocks nil :with-creator comment :with-drawers t :with-email nil 
:with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t 
:with-plannings nil ...))
  (if (or (not (fboundp template)) body-only) body (funcall template body info))
  (org-export-filter-apply-functions (plist-get info :filter-final-output) (if 
(or (not (fboundp template)) body-only) body (funcall template body info)) info)
  (let* ((body (org-element-normalize-string (org-export-data tree info))) 
(template (intern (format "org-%s-template" backend))) (output 
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if 
(or (not (fboundp template)) body-only) body (funcall template body info)) 
info))) (when org-export-copy-to-kill-ring (org-kill-new output)) output)
  (let ((info (org-export-install-filters 
(org-export-store-footnote-definitions (org-export-get-environment backend 
subtreep ext-plist)))) (tree (let ((buf (or (buffer-file-name ...) 
(current-buffer)))) (org-export-with-current-buffer-copy (unless noexpand 
(org-export-expand-include-keyword) (let (...) (org-export-blocks-preprocess))) 
(goto-char (point-min)) (let ((org-export-current-backend backend)) (run-hooks 
(quote org-export-before-parsing-hook))) (org-element-parse-buffer nil 
visible-only))))) (setq tree (org-export-filter-apply-functions (plist-get info 
:filter-parse-tree) tree info)) (setq info (org-combine-plists info 
(org-export-collect-tree-properties tree info))) (let* ((body 
(org-element-normalize-string (org-export-data tree info))) (template (intern 
(format "org-%s-template" backend))) (output (org-export-filter-apply-functions 
(plist-get info :filter-final-output) (if (or (not ...) body-only) body 
(funcall template body info)) info))) (when org-export-copy-to-kill-ring 
(org-kill-new output)) output))
  (save-restriction (cond ((org-region-active-p) (narrow-to-region 
(region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char 
(point-min)) (forward-line) (narrow-to-region (point) (point-max)))) (let 
((info (org-export-install-filters (org-export-store-footnote-definitions 
(org-export-get-environment backend subtreep ext-plist)))) (tree (let ((buf (or 
... ...))) (org-export-with-current-buffer-copy (unless noexpand 
(org-export-expand-include-keyword) (let ... ...)) (goto-char (point-min)) (let 
(...) (run-hooks ...)) (org-element-parse-buffer nil visible-only))))) (setq 
tree (org-export-filter-apply-functions (plist-get info :filter-parse-tree) 
tree info)) (setq info (org-combine-plists info 
(org-export-collect-tree-properties tree info))) (let* ((body 
(org-element-normalize-string (org-export-data tree info))) (template (intern 
(format "org-%s-template" backend))) (output (org-export-filter-apply-functions 
(plist-get info :filter-final-output) (if (or ... body-only) body (funcall 
template body info)) info))) (when org-export-copy-to-kill-ring (org-kill-new 
output)) output)))
  (save-excursion (save-restriction (cond ((org-region-active-p) 
(narrow-to-region (region-beginning) (region-end))) (subtreep 
(org-narrow-to-subtree) (goto-char (point-min)) (forward-line) 
(narrow-to-region (point) (point-max)))) (let ((info 
(org-export-install-filters (org-export-store-footnote-definitions 
(org-export-get-environment backend subtreep ext-plist)))) (tree (let ((buf 
...)) (org-export-with-current-buffer-copy (unless noexpand ... ...) (goto-char 
...) (let ... ...) (org-element-parse-buffer nil visible-only))))) (setq tree 
(org-export-filter-apply-functions (plist-get info :filter-parse-tree) tree 
info)) (setq info (org-combine-plists info (org-export-collect-tree-properties 
tree info))) (let* ((body (org-element-normalize-string (org-export-data tree 
info))) (template (intern (format "org-%s-template" backend))) (output 
(org-export-filter-apply-functions (plist-get info :filter-final-output) (if 
... body ...) info))) (when org-export-copy-to-kill-ring (org-kill-new output)) 
output))))
  org-export-as(e-latex nil nil nil nil nil)
  (let ((out (org-export-as backend subtreep visible-only body-only ext-plist 
noexpand))) (with-temp-buffer (insert out) (let ((coding-system-for-write 
org-export-coding-system)) (write-file file))))
  org-export-to-file(e-latex 
"/home/yagnesh/git/org-beamer-template/org-beamer-template.tex" nil nil nil nil)
  (let ((outfile (org-export-output-file-name ".tex" subtreep pub-dir))) 
(org-export-to-file (quote e-latex) outfile subtreep visible-only body-only 
ext-plist))
  org-e-latex-export-to-latex(nil nil nil nil nil)
  (org-e-latex-compile (org-e-latex-export-to-latex subtreep visible-only 
body-only ext-plist pub-dir))
  org-e-latex-export-to-pdf(nil nil nil)
  (org-open-file (org-e-latex-export-to-pdf (memq (quote subtree) optns) (memq 
(quote visible) optns) (memq (quote body) optns)))
  (cond ((eql --cl-var-- (quote 113)) nil) ((member* --cl-var-- (quote (65 78 
85))) (let ((outbuf (org-export-to-buffer (quote e-ascii) "*Org E-ASCII 
Export*" (memq (quote subtree) optns) (memq (quote visible) optns) (memq (quote 
body) optns) (\` (:ascii-charset ...))))) (with-current-buffer outbuf 
(text-mode)) (when org-export-show-temporary-export-buffer 
(switch-to-buffer-other-window outbuf)))) ((member* --cl-var-- (quote (97 110 
117))) (org-e-ascii-export-to-ascii (memq (quote subtree) optns) (memq (quote 
visible) optns) (memq (quote body) optns) (\` (:ascii-charset (\, (case raw-key 
(97 ...) (110 ...) (t ...))))))) ((eql --cl-var-- (quote 76)) (let ((outbuf 
(org-export-to-buffer (quote e-latex) "*Org E-LaTeX Export*" (memq (quote 
subtree) optns) (memq (quote visible) optns) (memq (quote body) optns)))) 
(with-current-buffer outbuf (latex-mode)) (when 
org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) ((eql --cl-var-- (quote 108)) (org-e-latex-export-to-latex (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) 
((eql --cl-var-- (quote 112)) (org-e-latex-export-to-pdf (memq (quote subtree) 
optns) (memq (quote visible) optns) (memq (quote body) optns))) ((eql 
--cl-var-- (quote 100)) (org-open-file (org-e-latex-export-to-pdf (memq (quote 
subtree) optns) (memq (quote visible) optns) (memq (quote body) optns)))) ((eql 
--cl-var-- (quote 72)) (let ((outbuf (org-export-to-buffer (quote e-html) "*Org 
E-HTML Export*" (memq (quote subtree) optns) (memq (quote visible) optns) (memq 
(quote body) optns)))) (with-current-buffer outbuf (if (featurep (quote 
nxhtml-mode)) (nxhtml-mode) (nxml-mode))) (when 
org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) ((eql --cl-var-- (quote 104)) (org-e-html-export-to-html (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) 
((eql --cl-var-- (quote 98)) (org-open-file (org-e-html-export-to-html (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) 
optns)))) ((eql --cl-var-- (quote 111)) (org-e-odt-export-to-odt (memq (quote 
subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) ((eql 
--cl-var-- (quote 79)) (org-open-file (org-e-odt-export-to-odt (memq (quote 
subtree) optns) (memq (quote visible) optns) (memq (quote body) optns)))) ((eql 
--cl-var-- (quote 70)) (org-e-publish-current-file (memq (quote force) optns))) 
((eql --cl-var-- (quote 80)) (org-e-publish-current-project (memq (quote force) 
optns))) ((eql --cl-var-- (quote 88)) (let ((project (assoc 
(org-icompleting-read "Publish project: " org-e-publish-project-alist nil t) 
org-e-publish-project-alist))) (org-e-publish project (memq (quote force) 
optns)))) ((eql --cl-var-- (quote 69)) (org-e-publish-all (memq (quote force) 
optns))) (t (error "No command associated with key %s" (char-to-string 
raw-key))))
  (let ((--cl-var-- (if (< raw-key 27) (+ raw-key 96) raw-key))) (cond ((eql 
--cl-var-- (quote 113)) nil) ((member* --cl-var-- (quote (65 78 85))) (let 
((outbuf (org-export-to-buffer (quote e-ascii) "*Org E-ASCII Export*" (memq ... 
optns) (memq ... optns) (memq ... optns) (\` ...)))) (with-current-buffer 
outbuf (text-mode)) (when org-export-show-temporary-export-buffer 
(switch-to-buffer-other-window outbuf)))) ((member* --cl-var-- (quote (97 110 
117))) (org-e-ascii-export-to-ascii (memq (quote subtree) optns) (memq (quote 
visible) optns) (memq (quote body) optns) (\` (:ascii-charset (\, (case raw-key 
... ... ...)))))) ((eql --cl-var-- (quote 76)) (let ((outbuf 
(org-export-to-buffer (quote e-latex) "*Org E-LaTeX Export*" (memq ... optns) 
(memq ... optns) (memq ... optns)))) (with-current-buffer outbuf (latex-mode)) 
(when org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) ((eql --cl-var-- (quote 108)) (org-e-latex-export-to-latex (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) 
((eql --cl-var-- (quote 112)) (org-e-latex-export-to-pdf (memq (quote subtree) 
optns) (memq (quote visible) optns) (memq (quote body) optns))) ((eql 
--cl-var-- (quote 100)) (org-open-file (org-e-latex-export-to-pdf (memq (quote 
subtree) optns) (memq (quote visible) optns) (memq (quote body) optns)))) ((eql 
--cl-var-- (quote 72)) (let ((outbuf (org-export-to-buffer (quote e-html) "*Org 
E-HTML Export*" (memq ... optns) (memq ... optns) (memq ... optns)))) 
(with-current-buffer outbuf (if (featurep (quote nxhtml-mode)) (nxhtml-mode) 
(nxml-mode))) (when org-export-show-temporary-export-buffer 
(switch-to-buffer-other-window outbuf)))) ((eql --cl-var-- (quote 104)) 
(org-e-html-export-to-html (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns))) ((eql --cl-var-- (quote 98)) (org-open-file 
(org-e-html-export-to-html (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns)))) ((eql --cl-var-- (quote 111)) 
(org-e-odt-export-to-odt (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns))) ((eql --cl-var-- (quote 79)) (org-open-file 
(org-e-odt-export-to-odt (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns)))) ((eql --cl-var-- (quote 70)) 
(org-e-publish-current-file (memq (quote force) optns))) ((eql --cl-var-- 
(quote 80)) (org-e-publish-current-project (memq (quote force) optns))) ((eql 
--cl-var-- (quote 88)) (let ((project (assoc (org-icompleting-read "Publish 
project: " org-e-publish-project-alist nil t) org-e-publish-project-alist))) 
(org-e-publish project (memq (quote force) optns)))) ((eql --cl-var-- (quote 
69)) (org-e-publish-all (memq (quote force) optns))) (t (error "No command 
associated with key %s" (char-to-string raw-key)))))
  (case (if (< raw-key 27) (+ raw-key 96) raw-key) (113 nil) ((65 78 85) (let 
((outbuf (org-export-to-buffer (quote e-ascii) "*Org E-ASCII Export*" (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) optns) 
(\` (:ascii-charset ...))))) (with-current-buffer outbuf (text-mode)) (when 
org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) ((97 110 117) (org-e-ascii-export-to-ascii (memq (quote subtree) 
optns) (memq (quote visible) optns) (memq (quote body) optns) (\` 
(:ascii-charset (\, (case raw-key (97 ...) (110 ...) (t ...))))))) (76 (let 
((outbuf (org-export-to-buffer (quote e-latex) "*Org E-LaTeX Export*" (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) 
optns)))) (with-current-buffer outbuf (latex-mode)) (when 
org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) (108 (org-e-latex-export-to-latex (memq (quote subtree) optns) (memq 
(quote visible) optns) (memq (quote body) optns))) (112 
(org-e-latex-export-to-pdf (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns))) (100 (org-open-file 
(org-e-latex-export-to-pdf (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns)))) (72 (let ((outbuf (org-export-to-buffer 
(quote e-html) "*Org E-HTML Export*" (memq (quote subtree) optns) (memq (quote 
visible) optns) (memq (quote body) optns)))) (with-current-buffer outbuf (if 
(featurep (quote nxhtml-mode)) (nxhtml-mode) (nxml-mode))) (when 
org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) (104 (org-e-html-export-to-html (memq (quote subtree) optns) (memq 
(quote visible) optns) (memq (quote body) optns))) (98 (org-open-file 
(org-e-html-export-to-html (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns)))) (111 (org-e-odt-export-to-odt (memq (quote 
subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) (79 
(org-open-file (org-e-odt-export-to-odt (memq (quote subtree) optns) (memq 
(quote visible) optns) (memq (quote body) optns)))) (70 
(org-e-publish-current-file (memq (quote force) optns))) (80 
(org-e-publish-current-project (memq (quote force) optns))) (88 (let ((project 
(assoc (org-icompleting-read "Publish project: " org-e-publish-project-alist 
nil t) org-e-publish-project-alist))) (org-e-publish project (memq (quote 
force) optns)))) (69 (org-e-publish-all (memq (quote force) optns))) (t (error 
"No command associated with key %s" (char-to-string raw-key))))
  (let* ((input (org-export-dispatch-ui (if (listp org-export-initial-scope) 
org-export-initial-scope (list org-export-initial-scope)) 
org-export-dispatch-use-expert-ui)) (raw-key (car input)) (optns (cdr input))) 
(case (if (< raw-key 27) (+ raw-key 96) raw-key) (113 nil) ((65 78 85) (let 
((outbuf (org-export-to-buffer (quote e-ascii) "*Org E-ASCII Export*" (memq ... 
optns) (memq ... optns) (memq ... optns) (\` ...)))) (with-current-buffer 
outbuf (text-mode)) (when org-export-show-temporary-export-buffer 
(switch-to-buffer-other-window outbuf)))) ((97 110 117) 
(org-e-ascii-export-to-ascii (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns) (\` (:ascii-charset (\, (case raw-key ... ... 
...)))))) (76 (let ((outbuf (org-export-to-buffer (quote e-latex) "*Org E-LaTeX 
Export*" (memq ... optns) (memq ... optns) (memq ... optns)))) 
(with-current-buffer outbuf (latex-mode)) (when 
org-export-show-temporary-export-buffer (switch-to-buffer-other-window 
outbuf)))) (108 (org-e-latex-export-to-latex (memq (quote subtree) optns) (memq 
(quote visible) optns) (memq (quote body) optns))) (112 
(org-e-latex-export-to-pdf (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns))) (100 (org-open-file 
(org-e-latex-export-to-pdf (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns)))) (72 (let ((outbuf (org-export-to-buffer 
(quote e-html) "*Org E-HTML Export*" (memq ... optns) (memq ... optns) (memq 
... optns)))) (with-current-buffer outbuf (if (featurep (quote nxhtml-mode)) 
(nxhtml-mode) (nxml-mode))) (when org-export-show-temporary-export-buffer 
(switch-to-buffer-other-window outbuf)))) (104 (org-e-html-export-to-html (memq 
(quote subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) 
(98 (org-open-file (org-e-html-export-to-html (memq (quote subtree) optns) 
(memq (quote visible) optns) (memq (quote body) optns)))) (111 
(org-e-odt-export-to-odt (memq (quote subtree) optns) (memq (quote visible) 
optns) (memq (quote body) optns))) (79 (org-open-file (org-e-odt-export-to-odt 
(memq (quote subtree) optns) (memq (quote visible) optns) (memq (quote body) 
optns)))) (70 (org-e-publish-current-file (memq (quote force) optns))) (80 
(org-e-publish-current-project (memq (quote force) optns))) (88 (let ((project 
(assoc (org-icompleting-read "Publish project: " org-e-publish-project-alist 
nil t) org-e-publish-project-alist))) (org-e-publish project (memq (quote 
force) optns)))) (69 (org-e-publish-all (memq (quote force) optns))) (t (error 
"No command associated with key %s" (char-to-string raw-key)))))
  org-export-dispatch()
  call-interactively(org-export-dispatch record nil)
  command-execute(org-export-dispatch record)
  execute-extended-command(nil "org-export-dispatch")
  call-interactively(execute-extended-command nil nil)
--8<---------------cut here---------------end--------------->8---


I reproduced with minimal set up. the document failing to export is available
at https://raw.github.com/yyr/org-beamer-template/master/org-beamer-template.org

--
ఎందరో మహానుభావులు అందరికి వందనములు
YYR