From mboxrd@z Thu Jan 1 00:00:00 1970 From: Yagnesh Raghava Yakkala Subject: [bug?] new latex exporter failing to export Date: Mon, 21 May 2012 10:11:41 +0900 Message-ID: <874nraz6b6.fsf@okhotsk19.lowtem.hokudai.ac.jp> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([208.118.235.92]:41817) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SWH9I-0007RI-Tm for emacs-orgmode@gnu.org; Sun, 20 May 2012 21:11:04 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1SWH9E-0005g3-UV for emacs-orgmode@gnu.org; Sun, 20 May 2012 21:11:00 -0400 Received: from plane.gmane.org ([80.91.229.3]:36993) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SWH9E-0005dR-GJ for emacs-orgmode@gnu.org; Sun, 20 May 2012 21:10:56 -0400 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1SWH9B-0000Ev-44 for emacs-orgmode@gnu.org; Mon, 21 May 2012 03:10:53 +0200 Received: from okhotsk19.lowtem.hokudai.ac.jp ([133.87.217.175]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 21 May 2012 03:10:53 +0200 Received: from hi by okhotsk19.lowtem.hokudai.ac.jp with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 21 May 2012 03:10:53 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org 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) ("" "was= ysym" t) ("" "latexsym" t) ("" "amssymb" t) ("" "hyperref" nil) "\\toleranc= e=3D1000") nil nil nil) (org-e-latex--guess-inputenc (org-splice-latex-header document-class-stri= ng 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) heade= r)))) (org-e-latex--guess-inputenc (org-splice-latex-header document-class-= string org-export-latex-default-packages-alist org-export-latex-packages-al= ist nil (plist-get info :latex-header-extra)))) (org-element-normalize-string (let* ((header (nth 1 (assoc class org-e-la= tex-classes))) (document-class-string (and (stringp header) (if class-optio= ns (replace-regexp-in-string "^[ ]*\\\\documentclass\\(\\[.*?\\]\\)" class= -options header t nil 1) header)))) (org-e-latex--guess-inputenc (org-splic= e-latex-header document-class-string org-export-latex-default-packages-alis= t org-export-latex-packages-alist nil (plist-get info :latex-header-extra))= ))) (let ((class (plist-get info :latex-class)) (class-options (plist-get inf= o :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 "^[ ]*\\\\documentcla= ss\\(\\[.*?\\]\\)" class-options header t nil 1) header)))) (org-e-latex--g= uess-inputenc (org-splice-latex-header document-class-string org-export-lat= ex-default-packages-alist org-export-latex-packages-alist nil (plist-get in= fo :latex-header-extra)))))) (concat (and (plist-get info :time-stamp-file) (format-time-string "%% Cr= eated %Y-%m-%d %a %H:%M\n")) (let ((class (plist-get info :latex-class)) (c= lass-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-e= xport-latex-default-packages-alist org-export-latex-packages-alist nil (pli= st-get info :latex-header-extra)))))) "\\providecommand{\\alert}[1]{\\textb= f{#1}}\n" (let ((sec-num (plist-get info :section-numbers))) (when (integer= p sec-num) (format "\\setcounter{secnumdepth}{%d}\n" sec-num))) (let ((auth= or (and (plist-get info :with-author) (let ((auth ...)) (and auth (org-expo= rt-data auth info))))) (email (and (plist-get info :with-email) (org-export= -data (plist-get info :email) info)))) (cond ((and author email (not (strin= g=3D "" email))) (format "\\author{%s\\thanks{%s}}\n" author email)) (autho= r (format "\\author{%s}\n" author)) (t "\\author{}\n"))) (let ((date (plist= -get info :date))) (and date (format "\\date{%s}\n" date))) (format "\\titl= e{%s}\n" title) (format "\\hypersetup{\n pdfkeywords=3D{%s},\n pdfsubject= =3D{%s},\n pdfcreator=3D{%s}}\n" (or (plist-get info :keywords) "") (or (p= list-get info :description) "") (if (not (plist-get info :with-creator)) ""= (plist-get info :creator))) "\\begin{document}\n\n" (org-element-normalize= -string (cond ((string=3D "" title) nil) ((not (stringp org-e-latex-title-c= ommand)) 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 (whole= nump depth) (format "\\setcounter{tocdepth}{%d}\n" depth)) "\\tableofconten= ts\n\\vspace*{1cm}\n\n"))) contents (let ((creator-info (plist-get info :wi= th-creator))) (cond ((not creator-info) "") ((eq creator-info (quote commen= t)) (format "%% %s\n" (plist-get info :creator))) (t (concat (plist-get inf= o :creator) "\n")))) "\\end{document}") (let ((title (org-export-data (plist-get info :title) info))) (concat (an= d (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-l= atex-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-n= um) (format "\\setcounter{secnumdepth}{%d}\n" sec-num))) (let ((author (and= (plist-get info :with-author) (let (...) (and auth ...)))) (email (and (pl= ist-get info :with-email) (org-export-data (plist-get info :email) info))))= (cond ((and author email (not (string=3D "" 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=3D{%s},\n pdfsubject=3D{%s},\n pdfcreator=3D{%s}}\n" (or = (plist-get info :keywords) "") (or (plist-get info :description) "") (if (n= ot (plist-get info :with-creator)) "" (plist-get info :creator))) "\\begin{= document}\n\n" (org-element-normalize-string (cond ((string=3D "" title) ni= l) ((not (stringp org-e-latex-title-command)) nil) ((string-match "\\(?:[^%= ]\\|^\\)%s" org-e-latex-title-command) (format org-e-latex-title-command ti= tle)) (t org-e-latex-title-command))) (let ((depth (plist-get info :with-to= c))) (when depth (concat (when (wholenump depth) (format "\\setcounter{tocd= epth}{%d}\n" depth)) "\\tableofcontents\n\\vspace*{1cm}\n\n"))) contents (l= et ((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\\inc= ludegraphics[width=3D0.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\\be= gin{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=3D0.80\\textwidth]{path/to= /fig.jpg}\n\\end{enumerate}\n\\item two figs\n\\label{sec-1-3}\n\\begin{enu= merate}\n\\item 0.5\n\\label{sec-1-3-1}\n\\includegraphics[width=3D0.80\\te= xtwidth]{path/to/fig.jpg}\n\\item 0.5\n\\label{sec-1-3-2}\n\\includegraphic= s[width=3D0.80\\textwidth]{path/to/fig.jpg}\n\\end{enumerate}\n\\end{enumer= ate}\n\\end{enumerate}\n" (:author ("Yagnesh Raghava Yakkala") :creator "Ge= nerated by Org mode 7.8.10 in Emacs 24.1.50.5." :date "\\today" :descriptio= n nil :email "yagnesh@live.com" :exclude-tags ("noexport") :headline-levels= 3 :keywords nil :language "en" :preserve-breaks nil :section-numbers t :se= lect-tags ("export") :time-stamp-file t :title ("Title") :with-archived-tre= es headline :with-author t :with-clocks nil :with-creator comment :with-dra= wers 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\\l= abel{sec-1}\n\\begin{enumerate}\n\\item with single figure\n\\label{sec-1-1= }\n\\includegraphics[width=3D0.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=3D0.80\\textwidth]= {path/to/fig.jpg}\n\\end{enumerate}\n\\item two figs\n\\label{sec-1-3}\n\\b= egin{enumerate}\n\\item 0.5\n\\label{sec-1-3-1}\n\\includegraphics[width=3D= 0.80\\textwidth]{path/to/fig.jpg}\n\\item 0.5\n\\label{sec-1-3-2}\n\\includ= egraphics[width=3D0.80\\textwidth]{path/to/fig.jpg}\n\\end{enumerate}\n\\en= d{enumerate}\n\\end{enumerate}\n" (:author ("Yagnesh Raghava Yakkala") :cre= ator "Generated by Org mode 7.8.10 in Emacs 24.1.50.5." :date "\\today" :de= scription nil :email "yagnesh@live.com" :exclude-tags ("noexport") :headlin= e-levels 3 :keywords nil :language "en" :preserve-breaks nil :section-numbe= rs t :select-tags ("export") :time-stamp-file t :title ("Title") :with-arch= ived-trees headline :with-author t :with-clocks nil :with-creator comment := with-drawers t :with-email nil :with-emphasize t :with-entities t :with-fix= ed-width t :with-footnotes t :with-plannings nil ...)) (if (or (not (fboundp template)) body-only) body (funcall template body i= nfo)) (org-export-filter-apply-functions (plist-get info :filter-final-output) = (if (or (not (fboundp template)) body-only) body (funcall template body inf= o)) 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))) (w= hen org-export-copy-to-kill-ring (org-kill-new output)) output) (let ((info (org-export-install-filters (org-export-store-footnote-defini= tions (org-export-get-environment backend subtreep ext-plist)))) (tree (let= ((buf (or (buffer-file-name ...) (current-buffer)))) (org-export-with-curr= ent-buffer-copy (unless noexpand (org-export-expand-include-keyword) (let (= ...) (org-export-blocks-preprocess))) (goto-char (point-min)) (let ((org-ex= port-current-backend backend)) (run-hooks (quote org-export-before-parsing-= hook))) (org-element-parse-buffer nil visible-only))))) (setq tree (org-exp= ort-filter-apply-functions (plist-get info :filter-parse-tree) tree info)) = (setq info (org-combine-plists info (org-export-collect-tree-properties tre= e 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 (o= r (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 (poi= nt-min)) (forward-line) (narrow-to-region (point) (point-max)))) (let ((inf= o (org-export-install-filters (org-export-store-footnote-definitions (org-e= xport-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) tre= e info)) (setq info (org-combine-plists info (org-export-collect-tree-prope= rties tree info))) (let* ((body (org-element-normalize-string (org-export-d= ata tree info))) (template (intern (format "org-%s-template" backend))) (ou= tput (org-export-filter-apply-functions (plist-get info :filter-final-outpu= t) (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-ma= x)))) (let ((info (org-export-install-filters (org-export-store-footnote-de= finitions (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-on= ly))))) (setq tree (org-export-filter-apply-functions (plist-get info :filt= er-parse-tree) tree info)) (setq info (org-combine-plists info (org-export-= collect-tree-properties tree info))) (let* ((body (org-element-normalize-st= ring (org-export-data tree info))) (template (intern (format "org-%s-templa= te" backend))) (output (org-export-filter-apply-functions (plist-get info := filter-final-output) (if ... body ...) info))) (when org-export-copy-to-kil= l-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-pli= st noexpand))) (with-temp-buffer (insert out) (let ((coding-system-for-writ= e org-export-coding-system)) (write-file file)))) org-export-to-file(e-latex "/home/yagnesh/git/org-beamer-template/org-bea= mer-template.tex" nil nil nil nil) (let ((outfile (org-export-output-file-name ".tex" subtreep pub-dir))) (o= rg-export-to-file (quote e-latex) outfile subtreep visible-only body-only e= xt-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 b= ody-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) (m= emq (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 (q= uote body) optns) (\` (:ascii-charset ...))))) (with-current-buffer outbuf = (text-mode)) (when org-export-show-temporary-export-buffer (switch-to-buffe= r-other-window outbuf)))) ((member* --cl-var-- (quote (97 110 117))) (org-e= -ascii-export-to-ascii (memq (quote subtree) optns) (memq (quote visible) o= ptns) (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 subtr= ee) 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 10= 8)) (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-ope= n-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*" (m= emq (quote subtree) optns) (memq (quote visible) optns) (memq (quote body) = optns)))) (with-current-buffer outbuf (if (featurep (quote nxhtml-mode)) (n= xhtml-mode) (nxml-mode))) (when org-export-show-temporary-export-buffer (sw= itch-to-buffer-other-window outbuf)))) ((eql --cl-var-- (quote 104)) (org-e= -html-export-to-html (memq (quote subtree) optns) (memq (quote visible) opt= ns) (memq (quote body) optns))) ((eql --cl-var-- (quote 98)) (org-open-file= (org-e-html-export-to-html (memq (quote subtree) optns) (memq (quote visib= le) optns) (memq (quote body) optns)))) ((eql --cl-var-- (quote 111)) (org-= e-odt-export-to-odt (memq (quote subtree) optns) (memq (quote visible) optn= s) (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-pu= blish-current-file (memq (quote force) optns))) ((eql --cl-var-- (quote 80)= ) (org-e-publish-current-project (memq (quote force) optns))) ((eql --cl-va= r-- (quote 88)) (let ((project (assoc (org-icompleting-read "Publish projec= t: " 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 as= sociated with key %s" (char-to-string raw-key)))) (let ((--cl-var-- (if (< raw-key 27) (+ raw-key 96) raw-key))) (cond ((eq= l --cl-var-- (quote 113)) nil) ((member* --cl-var-- (quote (65 78 85))) (le= t ((outbuf (org-export-to-buffer (quote e-ascii) "*Org E-ASCII Export*" (me= mq ... optns) (memq ... optns) (memq ... optns) (\` ...)))) (with-current-b= uffer outbuf (text-mode)) (when org-export-show-temporary-export-buffer (sw= itch-to-buffer-other-window outbuf)))) ((member* --cl-var-- (quote (97 110 = 117))) (org-e-ascii-export-to-ascii (memq (quote subtree) optns) (memq (quo= te visible) optns) (memq (quote body) optns) (\` (:ascii-charset (\, (case = raw-key ... ... ...)))))) ((eql --cl-var-- (quote 76)) (let ((outbuf (org-e= xport-to-buffer (quote e-latex) "*Org E-LaTeX Export*" (memq ... optns) (me= mq ... optns) (memq ... optns)))) (with-current-buffer outbuf (latex-mode))= (when org-export-show-temporary-export-buffer (switch-to-buffer-other-wind= ow outbuf)))) ((eql --cl-var-- (quote 108)) (org-e-latex-export-to-latex (m= emq (quote subtree) optns) (memq (quote visible) optns) (memq (quote body) = optns))) ((eql --cl-var-- (quote 112)) (org-e-latex-export-to-pdf (memq (qu= ote 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) (me= mq ... optns)))) (with-current-buffer outbuf (if (featurep (quote nxhtml-mo= de)) (nxhtml-mode) (nxml-mode))) (when org-export-show-temporary-export-buf= fer (switch-to-buffer-other-window outbuf)))) ((eql --cl-var-- (quote 104))= (org-e-html-export-to-html (memq (quote subtree) optns) (memq (quote visib= le) optns) (memq (quote body) optns))) ((eql --cl-var-- (quote 98)) (org-op= en-file (org-e-html-export-to-html (memq (quote subtree) optns) (memq (quot= e visible) optns) (memq (quote body) optns)))) ((eql --cl-var-- (quote 111)= ) (org-e-odt-export-to-odt (memq (quote subtree) optns) (memq (quote visibl= e) optns) (memq (quote body) optns))) ((eql --cl-var-- (quote 79)) (org-ope= n-file (org-e-odt-export-to-odt (memq (quote subtree) optns) (memq (quote v= isible) optns) (memq (quote body) optns)))) ((eql --cl-var-- (quote 70)) (o= rg-e-publish-current-file (memq (quote force) optns))) ((eql --cl-var-- (qu= ote 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-- (q= uote 69)) (org-e-publish-all (memq (quote force) optns))) (t (error "No com= mand associated with key %s" (char-to-string raw-key))))) (case (if (< raw-key 27) (+ raw-key 96) raw-key) (113 nil) ((65 78 85) (l= et ((outbuf (org-export-to-buffer (quote e-ascii) "*Org E-ASCII Export*" (m= emq (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-win= dow outbuf)))) ((97 110 117) (org-e-ascii-export-to-ascii (memq (quote subt= ree) optns) (memq (quote visible) optns) (memq (quote body) optns) (\` (:as= cii-charset (\, (case raw-key (97 ...) (110 ...) (t ...))))))) (76 (let ((o= utbuf (org-export-to-buffer (quote e-latex) "*Org E-LaTeX Export*" (memq (q= uote subtree) optns) (memq (quote visible) optns) (memq (quote body) optns)= ))) (with-current-buffer outbuf (latex-mode)) (when org-export-show-tempora= ry-export-buffer (switch-to-buffer-other-window outbuf)))) (108 (org-e-late= x-export-to-latex (memq (quote subtree) optns) (memq (quote visible) optns)= (memq (quote body) optns))) (112 (org-e-latex-export-to-pdf (memq (quote s= ubtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) (10= 0 (org-open-file (org-e-latex-export-to-pdf (memq (quote subtree) optns) (m= emq (quote visible) optns) (memq (quote body) optns)))) (72 (let ((outbuf (= org-export-to-buffer (quote e-html) "*Org E-HTML Export*" (memq (quote subt= ree) optns) (memq (quote visible) optns) (memq (quote body) optns)))) (with= -current-buffer outbuf (if (featurep (quote nxhtml-mode)) (nxhtml-mode) (nx= ml-mode))) (when org-export-show-temporary-export-buffer (switch-to-buffer-= other-window outbuf)))) (104 (org-e-html-export-to-html (memq (quote subtre= e) optns) (memq (quote visible) optns) (memq (quote body) optns))) (98 (org= -open-file (org-e-html-export-to-html (memq (quote subtree) optns) (memq (q= uote 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 su= btree) optns) (memq (quote visible) optns) (memq (quote body) optns)))) (70= (org-e-publish-current-file (memq (quote force) optns))) (80 (org-e-publis= h-current-project (memq (quote force) optns))) (88 (let ((project (assoc (o= rg-icompleting-read "Publish project: " org-e-publish-project-alist nil t) = org-e-publish-project-alist))) (org-e-publish project (memq (quote force) o= ptns)))) (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-disp= atch-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-buff= er-other-window outbuf)))) ((97 110 117) (org-e-ascii-export-to-ascii (memq= (quote subtree) optns) (memq (quote visible) optns) (memq (quote body) opt= ns) (\` (:ascii-charset (\, (case raw-key ... ... ...)))))) (76 (let ((outb= uf (org-export-to-buffer (quote e-latex) "*Org E-LaTeX Export*" (memq ... o= ptns) (memq ... optns) (memq ... optns)))) (with-current-buffer outbuf (lat= ex-mode)) (when org-export-show-temporary-export-buffer (switch-to-buffer-o= ther-window outbuf)))) (108 (org-e-latex-export-to-latex (memq (quote subtr= ee) optns) (memq (quote visible) optns) (memq (quote body) optns))) (112 (o= rg-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 (qu= ote 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-mod= e) (nxml-mode))) (when org-export-show-temporary-export-buffer (switch-to-b= uffer-other-window outbuf)))) (104 (org-e-html-export-to-html (memq (quote = subtree) optns) (memq (quote visible) optns) (memq (quote body) optns))) (9= 8 (org-open-file (org-e-html-export-to-html (memq (quote subtree) optns) (m= emq (quote visible) optns) (memq (quote body) optns)))) (111 (org-e-odt-exp= ort-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 (qu= ote 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 (as= soc (org-icompleting-read "Publish project: " org-e-publish-project-alist n= il t) org-e-publish-project-alist))) (org-e-publish project (memq (quote fo= rce) optns)))) (69 (org-e-publish-all (memq (quote force) optns))) (t (erro= r "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 availab= le at https://raw.github.com/yyr/org-beamer-template/master/org-beamer-templat= e.org -- =E0=B0=8E=E0=B0=82=E0=B0=A6=E0=B0=B0=E0=B1=8B =E0=B0=AE=E0=B0=B9=E0=B0=BE= =E0=B0=A8=E0=B1=81=E0=B0=AD=E0=B0=BE=E0=B0=B5=E0=B1=81=E0=B0=B2=E0=B1=81 = =E0=B0=85=E0=B0=82=E0=B0=A6=E0=B0=B0=E0=B0=BF=E0=B0=95=E0=B0=BF =E0=B0=B5= =E0=B0=82=E0=B0=A6=E0=B0=A8=E0=B0=AE=E0=B1=81=E0=B0=B2=E0=B1=81 YYR