From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bernd Weiss Subject: [bug] Symbol's function definition is void: when-let Date: Thu, 19 May 2011 12:16:48 -0400 Message-ID: <4DD54270.10305@uni-koeln.de> Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-15 Content-Transfer-Encoding: 7bit Return-path: Received: from eggs.gnu.org ([140.186.70.92]:48114) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QN5uA-0008Ra-Sq for emacs-orgmode@gnu.org; Thu, 19 May 2011 12:16:57 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QN5u7-0002NE-Un for emacs-orgmode@gnu.org; Thu, 19 May 2011 12:16:54 -0400 Received: from smtp-out.rrz.uni-koeln.de ([134.95.19.53]:53535) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QN5u7-0002MW-AA for emacs-orgmode@gnu.org; Thu, 19 May 2011 12:16:51 -0400 Received: from smtp-auth.rrz.uni-koeln.de (smtp-auth.rrz.uni-koeln.de [134.95.19.93]) by smtp-out.rrz.uni-koeln.de (8.13.8/8.13.8) with ESMTP id p4JGGlL5010325 for ; Thu, 19 May 2011 18:16:47 +0200 Received: from [146.201.200.38] (wireless-dhcp200d038.fsu.edu [146.201.200.38]) (authenticated as user ahf34 using CRAM-MD5 bits=0) by smtp-auth.uni-koeln.de (8.13.8/8.13.8) with ESMTP id p4JGGj4B011104 (version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NO) for ; Thu, 19 May 2011 18:16:46 +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 Hi all, after updating to the most recent version of org-mode, I cannot longer export to LaTeX/PDF. It stops with "Symbol's function definition is void: when-let", i.e. Fontifying org-src-fontification:emacs-lisp-mode... (regexps...............) Symbol's function definition is void: when-let Everything works as expected when I go back in time (e.g. three commits), using Git's checkout HEAD^^^ . My current HEAD refers to commit 72c154e38e526b5f8bb5f200fb31bc6fec145ba6 Please find below the output of M-x org-submit-bug-report and backtrace (which I shortend a bit). Thanks for your help, Bernd Emacs : GNU Emacs 23.3.1 (i386-mingw-nt6.1.7600) of 2011-03-10 on 3249CTO Package: Org-mode version 7.5 (release_7.5.285.g72c1) current state: ============== (setq org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars) org-export-latex-listings t org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook) org-agenda-custom-commands '(("c" "conferences" ((tags "CONFERENCE")) ((org-tags-match-list-sublevels nil)) ((org-columns-default-format "%DATE %LOCATION"))) ) org-agenda-files '("e:/projects/org/article/p_UnemploymentIntentionChild.org" "e:/projects/org/lehre/2011springterm.org" "e:/projects/org/projects/prDAAD-ipd-ma-divorce.org" "e:/projects/org/projects/prDAAD-ma-simulation.org" "e:/projects/publicat/book/b2012meta-analyse/doc/b2010meta-analyse.org" "e:/projects/org/projects/prDFG-Scheidung.org" "e:/projects/org/article/ar2010dyad.org" "e:/projects/org/article/ar2010dr.org" "e:/projects/org/privat.org" "e:/projects/org/work.org") org-src-fontify-natively t org-babel-load-languages '((emacs-lisp . t) (R . t) (python . t) (latex . t) (dot . t) (sh . t)) org-metaup-hook '(org-babel-load-in-session-maybe) org-after-todo-state-change-hook '(org-clock-out-if-current) org-babel-tangle-lang-exts '(("latex" . "tex") ("python" . "py") ("emacs-lisp" . "el")) org-edit-src-content-indentation 0 org-export-blocks-postblock-hook '(org-exp-res/src-name-cleanup) org-export-latex-format-toc-function 'org-export-latex-format-toc-default org-tab-first-hook '(org-hide-block-toggle-maybe org-src-native-tab-command-maybe org-babel-hide-result-toggle-maybe) org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer) org-confirm-shell-link-function 'yes-or-no-p org-export-first-hook '(org-beamer-initialize-open-trackers) org-agenda-before-write-hook '(org-agenda-add-entry-text) org-export-latex-packages-alist '(("" "color") ("" "listings")) org-default-notes-file "e:/projects/org//notes.org" org-directory "e:/projects/org/" org-babel-pre-tangle-hook '(save-buffer) org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-show-empty-lines org-optimize-window-after-visibility-change) org-export-latex-classes '(("per-file-class" "\\documentclass{article}\n [NO-DEFAULT-PACKAGES]\n [EXTRA]" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}") ("\\paragraph{%s}" . "\\paragraph*{%s}") ("\\subparagraph{%s}" . "\\subparagraph*{%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}")) ("beamer" "\\documentclass{beamer}" org-beamer-sectioning)) org-export-preprocess-before-normalizing-links-hook '(org-remove-file-link-modifiers) org-mode-hook '(org-mode-reftex-setup (lambda nil (org-add-hook (quote change-major-mode-hook) (quote org-show-block-all) (quote append) (quote local))) (lambda nil (org-add-hook (quote change-major-mode-hook) (quote org-babel-show-result-all) (quote append) (quote local)) ) org-babel-result-hide-spec org-babel-hide-all-hashes turn-on-org-cdlatex turn-on-auto-fill turn-on-font-lock turn-on-visual-line-mode) org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe) org-confirm-elisp-link-function 'yes-or-no-p org-export-interblocks '((lob org-babel-exp-lob-one-liners) (src org-babel-exp-inline-src-blocks)) org-occur-hook '(org-first-headline-recenter) org-from-is-user-regexp nil org-export-preprocess-before-selecting-backend-code-hook '(org-beamer-select-beamer-code) org-confirm-babel-evaluate nil org-hierarchical-checkbox-statistics nil org-src-tab-acts-natively t org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc org-beamer-auto-fragile-frames org-beamer-place-default-actions-for-lists) org-metadown-hook '(org-babel-pop-to-session-maybe) org-export-blocks '((src org-babel-exp-src-block nil) (comment org-export-blocks-format-comment t) (ditaa org-export-blocks-format-ditaa nil) (dot org-export-blocks-format-dot nil)) ) ===================== Debugger output: start ===================== Debugger entered--Lisp error: (void-function when-let) (when-let (f (nth 3 info)) (concat " " f)) (cons "flags" (when-let (f ...) (concat " " f))) (list (cons "lang" (nth 0 info)) (cons "flags" (when-let ... ...)) (cons "body" (nth 1 info))) (\` (("lang" \, ...) ("flags" \, ...) ("body" \, ...))) (org-fill-template "#+BEGIN_SRC %lang%flags\n%body\n#+END_SRC\n" (\` (... ... ...))) org-babel-exp-code(("R" "## make up some wide-formated data\ndfWide <- data.frame(id = c(1, 2), \n rel.beg.1 = c(0, 0), rel.end.1 = c(10, 25), \n rel.beg.2 = c(4, 14), rel.end.2 = c(20, NA))\ndfWide\n" ((:colname-names) (:rowname-names) (:result-params "replace" "output" "output" "replace") (:result-type . output) (:comments . "") (:shebang . "") (:cache . "no") (:padline . "") (:noweb . "no") (:tangle . "no") (:exports . "both") (:results . "replace output") (:session) (:rowname-names) (:result-type . output) (:result-params "output" "replace") (:padnewline . "yes") (:hlines . "no") (:colname-names)) "" nil 0)) (cond ((member* --cl-var-- ...) (silently) (clean) "") ((member* --cl-var-- ...) (silently) (clean) (org-babel-exp-code info)) ((member* --cl-var-- ...) (org-babel-exp-results info type nil hash) "") ((member* --cl-var-- ...) (org-babel-exp-results info type nil hash) (org-babel-exp-code info))) (let ((--cl-var-- ...)) (cond (... ... ... "") (... ... ... ...) (... ... "") (... ... ...))) (case (intern (or ... "code")) ((quote none) (silently) (clean) "") ((quote code) (silently) (clean) (org-babel-exp-code info)) ((quote results) (org-babel-exp-results info type nil hash) "") ((quote both) (org-babel-exp-results info type nil hash) (org-babel-exp-code info))) (progn (fset (quote clean) (function* ...)) (case (intern ...) (... ... ... "") (... ... ... ...) (... ... "") (... ... ...))) (unwind-protect (progn (fset ... ...) (case ... ... ... ... ...)) (if --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...))) (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind-protect (progn ... ...) (if --cl-letf-bound-- ... ...))) (letf ((... ...)) (case (intern ...) (... ... ... "") (... ... ... ...) (... ... "") (... ... ...))) (progn (fset (quote silently) (function* ...)) (letf (...) (case ... ... ... ... ...))) (unwind-protect (progn (fset ... ...) (letf ... ...)) (if --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...))) (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind-protect (progn ... ...) (if --cl-letf-bound-- ... ...))) (letf ((... ...)) (letf (...) (case ... ... ... ... ...))) (letf* ((... ...) (... ...)) (case (intern ...) (... ... ... "") (... ... ... ...) (... ... "") (... ... ...))) (flet ((silently nil ...) (clean nil ...)) (case (intern ...) (... ... ... "") (... ... ... ...) (... ... "") (... ... ...))) org-babel-exp-do-export(("R" "## make up some wide-formated data\ndfWide <- data.frame(id = c(1, 2), \n rel.beg.1 = c(0, 0), rel.end.1 = c(10, 25), \n rel.beg.2 = c(4, 14), rel.end.2 = c(20, NA))\ndfWide\n" ((:colname-names) (:rowname-names) (:result-params "replace" "output" "output" "replace") (:result-type . output) (:comments . "") (:shebang . "") (:cache . "no") (:padline . "") (:noweb . "no") (:tangle . "no") (:exports . "both") (:results . "replace output") (:session) (:rowname-names) (:result-type . output) (:result-params "output" "replace") (:padnewline . "yes") (:hlines . "no") (:colname-names)) "" nil 0) block "d1f6d22138f41daa3dd497ac95a9d5795814d024") (progn (when (member ... ...) (org-babel-exp-in-export-file lang ...) (setf hash ...)) (setf (nth 1 info) (if ... ... ...)) (org-babel-exp-do-export info (quote block) hash)) (if info (progn (when ... ... ...) (setf ... ...) (org-babel-exp-do-export info ... hash))) (when info (when (member ... ...) (org-babel-exp-in-export-file lang ...) (setf hash ...)) (setf (nth 1 info) (if ... ... ...)) (org-babel-exp-do-export info (quote block) hash)) (let* ((info ...) (lang ...) (raw-params ...) hash) (when info (when ... ... ...) (setf ... ...) (org-babel-exp-do-export info ... hash))) (save-excursion (goto-char (match-beginning 0)) (let* (... ... ... hash) (when info ... ... ...))) org-babel-exp-src-block(#("## make up some wide-formated data\ndfWide <- data.frame(id = c(1, 2), \n rel.beg.1 = c(0, 0), rel.end.1 = c(10, 25), \n rel.beg.2 = c(4, 14), rel.end.2 = c(20, NA))\ndfWide" 0 209 (fontified nil)) #("R" 0 1 (fontified nil)) #(":results" 0 8 (fontified nil)) #("output" 0 6 (fontified nil)) #("replace" 0 7 (fontified nil)) #(":exports" 0 8 (fontified nil)) #("both" 0 4 (fontified nil)) #(":session" 0 8 (fontified nil))) apply(org-babel-exp-src-block #("## make up some wide-formated data\ndfWide <- data.frame(id = c(1, 2), \n rel.beg.1 = c(0, 0), rel.end.1 = c(10, 25), \n rel.beg.2 = c(4, 14), rel.end.2 = c(20, NA))\ndfWide" 0 209 (fontified nil)) (#("R" 0 1 (fontified nil)) #(":results" 0 8 (fontified nil)) #("output" 0 6 (fontified nil)) #("replace" 0 7 (fontified nil)) #(":exports" 0 8 (fontified nil)) #("both" 0 4 (fontified nil)) #(":session" 0 8 (fontified nil)))) (if (memq type org-export-blocks-witheld) "" (apply func body headers)) (progn (if (memq type org-export-blocks-witheld) "" (apply func body headers))) (unwind-protect (progn (if ... "" ...)) (set-match-data save-match-data-internal (quote evaporate))) (let ((save-match-data-internal ...)) (unwind-protect (progn ...) (set-match-data save-match-data-internal ...))) (save-match-data (if (memq type org-export-blocks-witheld) "" (apply func body headers))) (let ((replacement ...)) (when replacement (replace-match replacement t t) (unless preserve-indent ...))) (progn (let (...) (when replacement ... ...))) (if (setq func (cadr ...)) (progn (let ... ...))) (when (setq func (cadr ...)) (let (...) (when replacement ... ...))) (while (re-search-forward org-exp-blocks-block-regexp nil t) (setq indentation (length ...)) (setq type (intern ...)) (setq headers (save-match-data ...)) (setq body (match-string 4)) (setq preserve-indent (or org-src-preserve-indentation ...)) (unless preserve-indent (setq body ...)) (unless (memq type types) (setq types ...)) (save-match-data (interblock start ...)) (when (setq func ...) (let ... ...)) (setq start (match-end 0))) (progn (fset (quote interblock) (function* ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward org-exp-blocks-block-regexp nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook))) (unwind-protect (progn (fset ... ...) (goto-char ...) (setq start ...) (while ... ... ... ... ... ... ... ... ... ... ...) (interblock start ...) (run-hooks ...)) (if --cl-letf-bound-- (fset ... --cl-letf-save--) (fmakunbound ...))) (let* ((--cl-letf-bound-- ...) (--cl-letf-save-- ...)) (unwind-protect (progn ... ... ... ... ... ...) (if --cl-letf-bound-- ... ...))) (letf ((... ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward org-exp-blocks-block-regexp nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook))) (letf* ((... ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward org-exp-blocks-block-regexp nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook))) (flet ((interblock ... ...)) (goto-char (point-min)) (setq start (point)) (while (re-search-forward org-exp-blocks-block-regexp nil t) (setq indentation ...) (setq type ...) (setq headers ...) (setq body ...) (setq preserve-indent ...) (unless preserve-indent ...) (unless ... ...) (save-match-data ...) (when ... ...) (setq start ...)) (interblock start (point-max)) (run-hooks (quote org-export-blocks-postblock-hook))) (let ((case-fold-search t) (types ...) indentation type func start body headers preserve-indent progress-marker) (flet (...) (goto-char ...) (setq start ...) (while ... ... ... ... ... ... ... ... ... ... ...) (interblock start ...) (run-hooks ...))) (save-window-excursion (let (... ... indentation type func start body headers preserve-indent progress-marker) (flet ... ... ... ... ... ...))) org-export-blocks-preprocess() (save-current-buffer (set-buffer (get-buffer-create " org-mode-tmp")) (erase-buffer) (insert string) (setq case-fold-search t) (let (...) (remove-text-properties ... ... ...)) (org-export-kill-licensed-text) (let (...) (org-mode)) (setq case-fold-search t) (org-clone-local-variables source-buffer "^\\(org-\\|orgtbl-\\)") (org-install-letbind) (run-hooks (quote org-export-preprocess-hook)) (untabify (point-min) (point-max)) (org-export-handle-include-files-recurse) (run-hooks (quote org-export-preprocess-after-include-files-hook)) (org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks (quote org-export-preprocess-after-macros-hook)) (org-export-remove-archived-trees archived-trees) (org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags (plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) (run-hooks (quote org-export-preprocess-after-tree-selection-hook)) (org-export-remove-tasks (plist-get parameters :tasks)) (org-export-blocks-preprocess) (org-export-mark-list-properties) (org-export-replace-src-segments-and-examples) (org-export-protect-colon-examples) (org-export-convert-protected-spaces) (when (plist-get parameters :footnotes) (org-footnote-normalize nil t)) (setq target-alist (org-export-define-heading-targets target-alist)) (run-hooks (quote org-export-preprocess-after-headline-targets-hook)) (org-export-remember-html-container-classes) (org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) (when (plist-get parameters :skip-before-1st-heading) (goto-char ...) (when ... ... ... ...)) (when (plist-get parameters :add-text) (goto-char ...) (insert ... "\n")) (org-export-remove-headline-metadata parameters) (setq target-alist (org-export-handle-invisible-targets target-alist)) (run-hooks (quote org-export-preprocess-before-selecting-backend-code-hook)) (org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) (org-export-remove-clock-lines) (org-export-protect-verbatim) (org-export-mark-blockquote-verse-center) (run-hooks (quote org-export-preprocess-after-blockquote-hook)) (unless (plist-get parameters :timestamps) (org-export-remove-timestamps)) (setq target-alist (org-export-attach-captions-and-attributes target-alist)) (org-export-mark-radio-links) (run-hooks (quote org-export-preprocess-after-radio-targets-hook)) (org-export-concatenate-multiline-links) (run-hooks (quote org-export-preprocess-before-normalizing-links-hook)) ...) (with-current-buffer (get-buffer-create " org-mode-tmp") (erase-buffer) (insert string) (setq case-fold-search t) (let (...) (remove-text-properties ... ... ...)) (org-export-kill-licensed-text) (let (...) (org-mode)) (setq case-fold-search t) (org-clone-local-variables source-buffer "^\\(org-\\|orgtbl-\\)") (org-install-letbind) (run-hooks (quote org-export-preprocess-hook)) (untabify (point-min) (point-max)) (org-export-handle-include-files-recurse) (run-hooks (quote org-export-preprocess-after-include-files-hook)) (org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks (quote org-export-preprocess-after-macros-hook)) (org-export-remove-archived-trees archived-trees) (org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags (plist-get parameters :select-tags) (plist-get parameters :exclude-tags)) (run-hooks (quote org-export-preprocess-after-tree-selection-hook)) (org-export-remove-tasks (plist-get parameters :tasks)) (org-export-blocks-preprocess) (org-export-mark-list-properties) (org-export-replace-src-segments-and-examples) (org-export-protect-colon-examples) (org-export-convert-protected-spaces) (when (plist-get parameters :footnotes) (org-footnote-normalize nil t)) (setq target-alist (org-export-define-heading-targets target-alist)) (run-hooks (quote org-export-preprocess-after-headline-targets-hook)) (org-export-remember-html-container-classes) (org-export-remove-or-extract-drawers drawers (plist-get parameters :drawers)) (when (plist-get parameters :skip-before-1st-heading) (goto-char ...) (when ... ... ... ...)) (when (plist-get parameters :add-text) (goto-char ...) (insert ... "\n")) (org-export-remove-headline-metadata parameters) (setq target-alist (org-export-handle-invisible-targets target-alist)) (run-hooks (quote org-export-preprocess-before-selecting-backend-code-hook)) (org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) (org-export-remove-clock-lines) (org-export-protect-verbatim) (org-export-mark-blockquote-verse-center) (run-hooks (quote org-export-preprocess-after-blockquote-hook)) (unless (plist-get parameters :timestamps) (org-export-remove-timestamps)) (setq target-alist (org-export-attach-captions-and-attributes target-alist)) (org-export-mark-radio-links) (run-hooks (quote org-export-preprocess-after-radio-targets-hook)) (org-export-concatenate-multiline-links) (run-hooks (quote org-export-preprocess-before-normalizing-links-hook)) ...) (let* ((org-export-current-backend ...) (archived-trees ...) (inhibit-read-only t) (drawers org-drawers) (outline-regexp "\\*+ ") (source-buffer ...) target-alist rtn) (setq org-export-target-aliases nil org-export-preferred-target-alist nil org-export-id-target-alist nil org-export-code-refs nil) (with-current-buffer (get-buffer-create " org-mode-tmp") (erase-buffer) (insert string) (setq case-fold-search t) (let ... ...) (org-export-kill-licensed-text) (let ... ...) (setq case-fold-search t) (org-clone-local-variables source-buffer "^\\(org-\\|orgtbl-\\)") (org-install-letbind) (run-hooks ...) (untabify ... ...) (org-export-handle-include-files-recurse) (run-hooks ...) (org-export-mark-list-end) (org-export-preprocess-apply-macros) (run-hooks ...) (org-export-remove-archived-trees archived-trees) (org-export-remove-comment-blocks-and-subtrees) (org-export-handle-export-tags ... ...) (run-hooks ...) (org-export-remove-tasks ...) (org-export-blocks-preprocess) (org-export-mark-list-properties) (org-export-replace-src-segments-and-examples) (org-export-protect-colon-examples) (org-export-convert-protected-spaces) (when ... ...) (setq target-alist ...) (run-hooks ...) (org-export-remember-html-container-classes) (org-export-remove-or-extract-drawers drawers ...) (when ... ... ...) (when ... ... ...) (org-export-remove-headline-metadata parameters) (setq target-alist ...) (run-hooks ...) (org-export-select-backend-specific-text) (org-export-protect-quoted-subtrees) (org-export-remove-clock-lines) (org-export-protect-verbatim) (org-export-mark-blockquote-verse-center) (run-hooks ...) (unless ... ...) (setq target-alist ...) (org-export-mark-radio-links) (run-hooks ...) (org-export-concatenate-multiline-links) (run-hooks ...) ...) (kill-buffer " org-mode-tmp") rtn) org-export-preprocess-string(#("#+STARTUP: indent\n\n# IMPORTANT: run (org-babel-execute-buffer) first!\n\n# see 6 Using Custom Classes at http://orgmode.org/worg/org-tutorials/org-latex-export.html \n#+begin_src emacs-lisp :results silent :exports none\n(add-to-list 'org-export-latex-classes\n '(\"per-file-class\"\n \"\\\\documentclass{article}\n [NO-DEFAULT-PACKAGES]\n [EXTRA]\"\n (\"\\\\section{%s}\" . \"\\\\section*{%s}\")\n (\"\\\\subsection{%s}\" . \"\\\\subsection*{%s}\")\n (\"\\\\subsubsection{%s}\" . \"\\\\subsubsection*{%s}\")\n (\"\\\\paragraph{%s}\" . \"\\\\paragraph*{%s}\")\n (\"\\\\subparagraph{%s}\" . \"\\\\subparagraph*{%s}\")))\n#+end_src\n\n\n#+author: Bernd [...] font-lock-fontified t) 861 862 (fontified nil :org-license-to-kill t) 862 902 (fontified nil font-lock-fontified t) 902 903 (fontified nil font-lock-fontified t) 903 947 (fontified nil font-lock-fontified t) 947 948 (fontified nil font-lock-fontified t) 948 991 (fontified nil font-lock-fontified t) 991 992 (fontified nil font-lock-fontified t) 992 1030 (fontified nil font-lock-fontified t) 1030 1031 (fontified nil font-lock-fontified t) 1031 1068 (fontified nil font-lock-fontified t) 1068 1069 (fontified nil font-lock-fontified t) 1069 1105 (fontified nil font-lock-fontified t) 1105 1106 (fontified nil font-lock-fontified t) 1106 1159 (fontified nil font-lock-fontified t) 1159 1160 (fontified nil font-lock-fontified t) 1160 1163 (fontified nil :org-license-to-kill t) 1163 1176 (fontified nil font-lock-fontified t) 1176 1177 (fontified nil font-lock-fontified t) 1177 1196 (fontified nil font-lock-fontified t :org-license-to-kill t) 1196 1197 (fontified nil font-lock-fontified t :org-license-to-kill t) 1197 1199 (fontified nil help-echo "Footnote reference" font-lock-fontified t :org-license-to-kill t) 1199 1200 (fontified nil help-echo "Footnote reference" rear-nonsticky (mouse-face highlight keymap invisible intangible help-echo org-linked-text) font-lock-fontified t :org-license-to-kill t) 1200 1598 (fontified nil font-lock-fontified t :org-license-to-kill t) 1598 1599 (fontified nil font-lock-fontified t :org-license-to-kill t) 1599 1610 (fontified nil font-lock-fontified t) 1610 1611 (fontified nil) 1611 1612 (fontified nil :org-license-to-kill t) 1612 1613 (fontified nil) 1613 1615 (fontified nil) 1615 1619 (fontified nil) 1619 1620 (fontified nil) 1620 1871 (fontified nil) 1871 1872 (fontified nil) 1872 1914 (fontified nil) 1914 7461 (fontified nil) 7461 7477 (fontified nil) 7477 9074 (fontified nil) 9074 9088 (fontified nil) 9088 17188 (fontified nil) 17188 17204 (fontified nil) 17204 17853 (fontified nil) 17853 17867 (fontified nil) 17867 20693 (fontified nil) 20693 20726 (fontified nil) 20726 27183 (fontified nil) 27183 27185 (fontified nil) 27185 27230 (fontified nil) 27230 27232 (fontified nil) 27232 27277 (fontified nil) 27277 27279 (fontified nil) 27279 27324 (fontified nil) 27324 28106 (fontified nil) 28106 28108 (fontified nil) 28108 28153 (fontified nil) 28153 28155 (fontified nil) 28155 28200 (fontified nil) 28200 28202 (fontified nil) 28202 28247 (fontified nil) 28247 28249 (fontified nil) 28249 28294 (fontified nil) 28294 28296 (fontified nil) 28296 28341 (fontified nil) 28341 29401 (fontified nil) 29401 29403 (fontified nil) 29403 29462 (fontified nil) 29462 29464 (fontified nil) 29464 29523 (fontified nil) 29523 29525 (fontified nil) 29525 29584 (fontified nil) 29584 29586 (fontified nil) 29586 29645 (fontified nil) 29645 29647 (fontified nil) 29647 29706 (fontified nil) 29706 29708 (fontified nil) 29708 29767 (fontified nil) 29767 29769 (fontified nil) 29769 29828 (fontified nil) 29828 31893 (fontified nil) 31893 31909 (fontified nil) 31909 34363 (fontified nil) 34363 34377 (fontified nil) 34377 34593 (fontified nil)) :emph-multiline t :for-backend latex :comments nil :tags not-in-toc :priority nil :footnotes t :drawers nil :timestamps t :todo-keywords t :tasks t :add-text nil :skip-before-1st-heading nil :select-tags ("export") :exclude-tags ("noexport") :LaTeX-fragments nil) (let* ((wcf ...) (opt-plist ...) (region-p ...) (rbeg ...) (rend ...) (subtree-p ...) (opt-plist ...) (org-export-latex-options-plist ...) (org-current-export-dir ...) (org-current-export-file buffer-file-name) (title ...) (filename ...) (filename ...) (buffer ...) (odd org-odd-levels-only) (header ...) (skip ...) (text ...) (org-export-preprocess-hook ...) (first-lines ...) (coding-system ...) (coding-system-for-write ...) (save-buffer-coding-system ...) (region ...) (text ...) (string-for-export ...)) (set-buffer buffer) (erase-buffer) (org-install-letbind) (and (fboundp ...) (set-buffer-file-coding-system coding-system-for-write)) (unless (or ... body-only) (insert header)) (when (and text ...) (insert ... "\n\n")) (unless (or skip ...) (insert first-lines)) (org-export-latex-global (with-temp-buffer ... ... ...)) (unless body-only (insert "\n\\end{document}")) (goto-char (point-min)) (while (re-search-forward "^[ ]*\\\\item\\([ ]+\\)\\[" nil t) (delete-region ... ...)) (goto-char (point-min)) (when (re-search-forward "\\[TABLE-OF-CONTENTS\\]" nil t) (goto-char ...) (while ... ...) (goto-char ...) (and ... ...)) (goto-char (point-min)) (while (re-search-forward "^[ ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\label.*\\)*\n\\\\begin" nil t) (delete-region ... ...)) (goto-char (point-min)) (while (re-search-forward "^[ ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\label.*\\)*" nil t) (if ... ...)) (run-hooks (quote org-export-latex-final-hook)) (if to-buffer (unless ... ...) (save-buffer)) (org-export-latex-fix-inputenc) (run-hooks (quote org-export-latex-after-save-hook)) (goto-char (point-min)) (or (org-export-push-to-kill-ring "LaTeX") (message "Exporting to LaTeX...done")) (prog1 (if ... ... ...) (set-window-configuration wcf))) org-export-as-latex(nil nil nil nil nil nil) (let* ((wconfig ...) (lbuf ...) (file ...) (base ...) (pdffile ...) (cmds org-latex-to-pdf-process) (outbuf ...) (bibtex-p ...) cmd output-dir errors) (with-current-buffer outbuf (erase-buffer)) (message (concat "Processing LaTeX file " file "...")) (setq output-dir (file-name-directory file)) (if (and cmds ...) (funcall cmds ...) (while cmds ... ... ... ... ...)) (message (concat "Processing LaTeX file " file "...done")) (setq errors (org-export-latex-get-error outbuf)) (if (not ...) (error ...) (set-window-configuration wconfig) (when org-export-pdf-remove-logfiles ...) (message ...) pdffile)) org-export-as-pdf(nil) call-interactively(org-export-as-pdf) (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel p ...) (message "Background process \"%s\": started" p)) (if subtree-p (progn ... ...)) (call-interactively (nth 1 ass)) (when (and bpos ...) (let ... ... ... ... ...))) (let* ((bg ...) (subtree-p ...) (help "[t] insert the export option template\n[v] limit export to visible part of outline tree\n[1] switch buffer/subtree export\n[SPC] publish enclosing subtree (with LaTeX_CLASS or EXPORT_FILE_NAME prop)\n\n[a/n/u] export as ASCII/Latin-1/UTF-8 [A/N/U] to temporary buffer\n\n[h] export as HTML [H] to temporary buffer [R] export region\n[b] export as HTML and open in browser\n\n[l] export as LaTeX [L] to temporary buffer\n[p] export as LaTeX and process to PDF [d] ... and open PDF file\n\n[D] export as DocBook [V] export as DocBook, process to PDF, and open\n\n[j] export as TaskJuggler [J] ... and open\n\n[m] export as Freemind mind map\n[x] export as XOXO\n[g] export using Wes Hardaker's generic exporter\n\n[i] export current file as iCalendar file\n[I] export all agenda files as iCalendar files [c] ...as one combined file\n\n[F] publish current file [P] publish current project\n[X] publish a project... [E] publish every projects") (cmds ...) r1 r2 ass (cpos ...) (cbuf ...) bpos) (save-excursion (save-window-excursion ... ... ... ... ... ...)) (redisplay) (and bpos (goto-char bpos)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (if subtree-p ...) (call-interactively ...) (when ... ...))) org-export(nil) call-interactively(org-export nil nil) ===================== Debugger output: end =====================