From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bill Burdick Subject: Re: Bug: Exception when trying to export inlined-code [8.3.4 (8.3.4-9-gfda14f-elpa @ ~/.emacs.d/elpa/org-20160307/)] Date: Thu, 10 Mar 2016 06:33:40 +0000 Message-ID: References: Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=001a11c244b064062e052dabffff Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:41413) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aduAY-0006PQ-AB for emacs-orgmode@gnu.org; Thu, 10 Mar 2016 01:34:03 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1aduAT-0003tn-3D for emacs-orgmode@gnu.org; Thu, 10 Mar 2016 01:33:58 -0500 Received: from mail-lb0-x233.google.com ([2a00:1450:4010:c04::233]:34613) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aduAS-0003s5-Ds for emacs-orgmode@gnu.org; Thu, 10 Mar 2016 01:33:53 -0500 Received: by mail-lb0-x233.google.com with SMTP id xr8so94680020lbb.1 for ; Wed, 09 Mar 2016 22:33:51 -0800 (PST) In-Reply-To: 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: Shlomi Vaknin , "Charles C. Berry" Cc: "emacs-orgmode@gnu.org" --001a11c244b064062e052dabffff Content-Type: text/plain; charset=UTF-8 (Hi Shlomi!) When I export this to html, I get what looks to be the same error. Here's some info that may help track this down. My org-version line: Org-mode version 8.3.4 (8.3.4-9-gfda14f-elpaplus @ c:/Users/bill/.emacs.d/elpa/org-plus-contrib-20160307/) The error I get: org-element--current-element: Wrong type argument: integer-or-marker-p, nil [2 times] The stack trace: Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil) org-element-plain-list-parser(122 (86) ((28 2 "- " nil nil nil 51) (51 2 "-" nil nil nil 55) (55 2 "-" nil nil nil 59) (59 2 "-" nil nil nil 63) (63 2 "- " nil nil nil 99) (99 2 "- " nil nil nil 135) (135 2 "- " nil nil nil 158))) org-element--current-element(122 element nil ((28 2 "- " nil nil nil 51) (51 2 "-" nil nil nil 55) (55 2 "-" nil nil nil 59) (59 2 "-" nil nil nil 63) (63 2 "- " nil nil nil 99) (99 2 "- " nil nil nil 135) (135 2 "- " nil nil nil 158))) org-element--parse-to(101) org-element-at-point() org-element-context() org-babel-exp-process-buffer(#<2>>) (unwind-protect (org-babel-exp-process-buffer reference) (kill-buffer reference)) (let ((reference (org-export-copy-buffer))) (unwind-protect (org-babel-exp-process-buffer reference) (kill-buffer reference))) org-export-execute-babel-code() (progn (run-hook-with-args (quote org-export-before-processing-hook) (progn nil (or (and (memq (aref backend 0) cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list (quote org-export-backend) backend))) (aref backend 1))) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (quote org-export-before-parsing-hook) (progn nil (or (and (memq (aref backend 0) cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list (quote org-export-backend) backend))) (aref backend 1)))) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info (org-export-install-filters (org-combine-plists info (org-export-get-environment backend subtreep ext-plist)))) (let ((backend-name (progn nil (or (and (memq ... cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list ... backend))) (aref backend 1)))) (let ((--dolist-tail-- (plist-get info :filter-options)) filter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (let ((result (funcall filter info backend-name))) (if result (progn (setq info result)))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (org-macro-replace-all (list (cons "author" (org-element-interpret-data (plist-get info :author))) (cons "date" (let* ((date (plist-get info :date)) (value (or ... ""))) (if (and (consp date) (not ...) (eq ... ...)) (format "(eval (if (org-string-nw-p \"$1\") %s %S))" (format "(org-timestamp-format '%S \"$1\")" ...) value) value))) (cons "email" (org-element-interpret-data (plist-get info :email))) (cons "title" (org-element-interpret-data (plist-get info :title))) (cons "results" "$1")) (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (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 (or (org-export-data tree info) ""))) (inner-template (cdr (assq (quote inner-template) (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq (quote template) (plist-get info :translate-alist))))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)) info)))) (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote org-export-before-processing-hook) (progn nil (or (and (memq (aref backend 0) cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list (quote org-export-backend) backend))) (aref backend 1))) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (quote org-export-before-parsing-hook) (progn nil (or (and (memq ... cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list ... backend))) (aref backend 1)))) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info (org-export-install-filters (org-combine-plists info (org-export-get-environment backend subtreep ext-plist)))) (let ((backend-name (progn nil (or (and ...) (signal ... ...)) (aref backend 1)))) (let ((--dolist-tail-- (plist-get info :filter-options)) filter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (let ((result ...)) (if result (progn ...))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (org-macro-replace-all (list (cons "author" (org-element-interpret-data (plist-get info :author))) (cons "date" (let* ((date ...) (value ...)) (if (and ... ... ...) (format "(eval (if (org-string-nw-p \"$1\") %s %S))" ... value) value))) (cons "email" (org-element-interpret-data (plist-get info :email))) (cons "title" (org-element-interpret-data (plist-get info :title))) (cons "results" "$1")) (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (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 (or (org-export-data tree info) ""))) (inner-template (cdr (assq (quote inner-template) (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not ...) body (funcall inner-template body info)) info)) (template (cdr (assq (quote template) (plist-get info :translate-alist))))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) (if (or (not ...) body-only) full-body (funcall template full-body info)) info))))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote org-export-before-processing-hook) (progn nil (or (and (memq ... cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list ... backend))) (aref backend 1))) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (quote org-export-before-parsing-hook) (progn nil (or (and ...) (signal ... ...)) (aref backend 1)))) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info (org-export-install-filters (org-combine-plists info (org-export-get-environment backend subtreep ext-plist)))) (let ((backend-name (progn nil (or ... ...) (aref backend 1)))) (let ((--dolist-tail-- (plist-get info :filter-options)) filter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (let (...) (if result ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (org-macro-replace-all (list (cons "author" (org-element-interpret-data (plist-get info :author))) (cons "date" (let* (... ...) (if ... ... value))) (cons "email" (org-element-interpret-data (plist-get info :email))) (cons "title" (org-element-interpret-data (plist-get info :title))) (cons "results" "$1")) (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (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 (or ... ""))) (inner-template (cdr (assq ... ...))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if ... body ...) info)) (template (cdr (assq ... ...)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) (if (or ... body-only) full-body (funcall template full-body info)) info))))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy)))) (let ((--buf-copy (org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote org-export-before-processing-hook) (progn nil (or (and ...) (signal ... ...)) (aref backend 1))) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (quote org-export-before-parsing-hook) (progn nil (or ... ...) (aref backend 1)))) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info (org-export-install-filters (org-combine-plists info (org-export-get-environment backend subtreep ext-plist)))) (let ((backend-name (progn nil ... ...))) (let ((--dolist-tail-- ...) filter) (while --dolist-tail-- (setq filter ...) (let ... ...) (setq --dolist-tail-- ...)))) (org-macro-replace-all (list (cons "author" (org-element-interpret-data ...)) (cons "date" (let* ... ...)) (cons "email" (org-element-interpret-data ...)) (cons "title" (org-element-interpret-data ...)) (cons "results" "$1")) (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (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 ...)) (inner-template (cdr ...)) (full-body (org-export-filter-apply-functions ... ... info)) (template (cdr ...))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) (if ... full-body ...) info))))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy))))) (let* ((org-export-current-backend (progn nil (or (and (memq (aref backend 0) cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list (quote org-export-backend) backend))) (aref backend 1))) (info (org-combine-plists (list :export-options (delq nil (list (and subtreep ...) (and visible-only ...) (and body-only ...)))) (org-export--get-buffer-attributes))) (parsed-keywords (delq nil (mapcar (function (lambda (o) (and ... ...))) (append (org-export-get-all-options backend) org-export-options-alist)))) tree) (let ((--buf-copy (org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote org-export-before-processing-hook) (progn nil (or ... ...) (aref backend 1))) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (quote org-export-before-parsing-hook) (progn nil ... ...))) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info (org-export-install-filters (org-combine-plists info ...))) (let ((backend-name ...)) (let (... filter) (while --dolist-tail-- ... ... ...))) (org-macro-replace-all (list (cons "author" ...) (cons "date" ...) (cons "email" ...) (cons "title" ...) (cons "results" "$1")) (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (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 ...) (inner-template ...) (full-body ...) (template ...)) (org-no-properties (org-export-filter-apply-functions ... ... info))))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy)))))) (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* ((org-export-current-backend (progn nil (or (and (memq ... cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list ... backend))) (aref backend 1))) (info (org-combine-plists (list :export-options (delq nil (list ... ... ...))) (org-export--get-buffer-attributes))) (parsed-keywords (delq nil (mapcar (function (lambda ... ...)) (append (org-export-get-all-options backend) org-export-options-alist)))) tree) (let ((--buf-copy (org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quote org-export-before-processing-hook) (progn nil ... ...)) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args ... ...)) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info (org-export-install-filters ...)) (let (...) (let ... ...)) (org-macro-replace-all (list ... ... ... ... ...) (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (setq tree (org-export-filter-apply-functions ... tree info)) (setq info (org-combine-plists info ...)) (let* (... ... ... ...) (org-no-properties ...)))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy))))))) (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* ((org-export-current-backend (progn nil (or (and ...) (signal ... ...)) (aref backend 1))) (info (org-combine-plists (list :export-options (delq nil ...)) (org-export--get-buffer-attributes))) (parsed-keywords (delq nil (mapcar (function ...) (append ... org-export-options-alist)))) tree) (let ((--buf-copy (org-export-copy-buffer))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args ... ...) (org-export-expand-include-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (goto-char ...) (save-excursion ...) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq info ...) (let ... ...) (org-macro-replace-all ... ... parsed-keywords) (setq tree ...) (org-export--merge-external-footnote-definitions tree) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (setq tree ...) (setq info ...) (let* ... ...))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer ... ...) (kill-buffer --buf-copy)))))))) org-export-as(html nil nil nil (:output-file "./tmp.html")) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (let ((coding-system-for-write encoding)) (write-file file))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file)) (if async (let ((with-temp-message "Initializing asynchronous export process") (current-message)) (unwind-protect (progn (if with-temp-message (progn (setq current-message (current-message)) (message "%s" with-temp-message))) (let ((--copy-fun (org-export--generate-copy-script ...)) (--temp-file (make-temp-file "org-export-process")) (--coding buffer-file-coding-system)) (let ((temp-file --temp-file) (temp-buffer ...)) (unwind-protect (prog1 ... ...) (and ... ...))) (let* ((process-connection-type nil) (--proc-buffer ...) (--process ...)) (org-export-add-to-stack (get-buffer --proc-buffer) nil --process) (let (...) (set-process-sentinel --process ...))))) (and with-temp-message (if current-message (message "%s" current-message) (message nil))))) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (let (...) (write-file file))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file))) (let ((ext-plist (org-combine-plists (list (quote :output-file) file) ext-plist)) (encoding (or org-export-coding-system buffer-file-coding-system))) (if async (let ((with-temp-message "Initializing asynchronous export process") (current-message)) (unwind-protect (progn (if with-temp-message (progn (setq current-message ...) (message "%s" with-temp-message))) (let ((--copy-fun ...) (--temp-file ...) (--coding buffer-file-coding-system)) (let (... ...) (unwind-protect ... ...)) (let* (... ... ...) (org-export-add-to-stack ... nil --process) (let ... ...)))) (and with-temp-message (if current-message (message "%s" current-message) (message nil))))) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (let ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file)))) (if (not (file-writable-p file)) (error "Output file not writable") (let ((ext-plist (org-combine-plists (list (quote :output-file) file) ext-plist)) (encoding (or org-export-coding-system buffer-file-coding-system))) (if async (let ((with-temp-message "Initializing asynchronous export process") (current-message)) (unwind-protect (progn (if with-temp-message (progn ... ...)) (let (... ... ...) (let ... ...) (let* ... ... ...))) (and with-temp-message (if current-message (message "%s" current-message) (message nil))))) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ...) (and ... ...)))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file))))) org-export-to-file(html "./tmp.html" nil nil nil nil nil) (let* ((extension (concat "." (or (plist-get ext-plist :html-extension) org-html-extension "html"))) (file (org-export-output-file-name extension subtreep)) (org-export-coding-system org-html-coding-system)) (org-export-to-file (quote html) file async subtreep visible-only body-only ext-plist)) org-html-export-to-html() funcall-interactively(org-html-export-to-html) call-interactively(org-html-export-to-html record nil) command-execute(org-html-export-to-html record) helm-M-x(nil "org-html-export-to-html") funcall-interactively(helm-M-x nil "org-html-export-to-html") call-interactively(helm-M-x nil nil) command-execute(helm-M-x) On Thu, Mar 10, 2016 at 7:46 AM Shlomi Vaknin wrote: > >> Its been in master since Jan 2015. > > Yeah, I guess I didnt update my packages in quite a while :P > > >> >> It works for me as does the same with `emacs-lisp' as the language >> under latex or html export to buffer or file using: Org-mode version >> 8.3.4 (release_8.3.4-635-g268486 ...) producing the expected document. >> >> Not sure what gives. Perhaps a mixed installation of org-mode? >> > > So I checked this (to the best of my knowledge), I searched and removed > everything that had to do with org-mode, got master, compiled and installed > it. (org-version) now gives "Org-mode version 8.3.4 > (release_8.3.4-635-g268486 @ ~/org-mode/org-mode/lisp/)" > > and although the minimal example I posted above *does* work now, my real > file does not. I managed to make another non-working example (should I make > a gif showing what I see?): > > --------------------------------------- > - src_elisp{3} {{{results(=3=)}}} > > * B > - src_elisp{3} {{{results(=3=)}}} > - > - > - > - src_elisp{3} {{{results(=3=)}}} > - src_elisp{2} {{{results(=2=)}}} > - {{{results(=2=)}}} > --------------------------------------- > > again, removing any line from this makes export work again. Otherwise I > get =org-element--current-element: Wrong type argument: > integer-or-marker-p, nil= > > This might be something silly, but I really dont know what else to do and > I am quite stuck, I need to present my org file to emacs-hostile people :| > > I have a new installation of emacs (used =find= to remove all other emacs > paths), new org-mode compiled from source (looked through =find= as well as > checked all 'load-path locations and removed anything I found) and no > custom init files.... What else could I check on my system? > > I am using a mac, if that makes any differences.. > > Thanks for your help! > > > > --001a11c244b064062e052dabffff Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
(Hi Shlomi!)

When I export this to html= , I get what looks to be the same error.=C2=A0 Here's some info that ma= y help track this down.

My org-version line:
=
Org-mode version 8.3.4 (8.3.4-9-gfda14f-elpaplus @ c:/Users/bill/= .emacs.d/elpa/org-plus-contrib-20160307/)

The erro= r I get:
org-element--current-element: Wrong type argument: integ= er-or-marker-p, nil [2 times]

The stack trac= e:

Debugger entered--Lisp error: (wrong-type-= argument integer-or-marker-p nil)
=C2=A0 org-element-plain-list-p= arser(122 (86) ((28 2 "- " nil nil nil 51) (51 2 "-" ni= l nil nil 55) (55 2 "-" nil nil nil 59) (59 2 "-" nil n= il nil 63) (63 2 "- " nil nil nil 99) (99 2 "- " nil ni= l nil 135) (135 2 "- " nil nil nil 158)))
=C2=A0 org-el= ement--current-element(122 element nil ((28 2 "- " nil nil nil 51= ) (51 2 "-" nil nil nil 55) (55 2 "-" nil nil nil 59) (= 59 2 "-" nil nil nil 63) (63 2 "- " nil nil nil 99) (99= 2 "- " nil nil nil 135) (135 2 "- " nil nil nil 158)))=
=C2=A0 org-element--parse-to(101)
=C2=A0 org-element-a= t-point()
=C2=A0 org-element-context()
=C2=A0 org-babel= -exp-process-buffer(#<buffer tmp.org<2= ><2>>)
=C2=A0 (unwind-protect (org-babel-exp-process-= buffer reference) (kill-buffer reference))
=C2=A0 (let ((referenc= e (org-export-copy-buffer))) (unwind-protect (org-babel-exp-process-buffer = reference) (kill-buffer reference)))
=C2=A0 org-export-execute-ba= bel-code()
=C2=A0 (progn (run-hook-with-args (quote org-export-be= fore-processing-hook) (progn nil (or (and (memq (aref backend 0) cl-struct-= org-export-backend-tags)) (signal (quote wrong-type-argument) (list (quote = org-export-backend) backend))) (aref backend 1))) (org-export-expand-includ= e-keyword) (org-export--delete-comments) (org-macro-initialize-templates) (= org-macro-replace-all org-macro-templates nil parsed-keywords) (org-set-reg= exps-and-options) (org-update-radio-target-regexp) (org-export-execute-babe= l-code) (org-set-regexps-and-options) (org-update-radio-target-regexp) (got= o-char (point-min)) (save-excursion (run-hook-with-args (quote org-export-b= efore-parsing-hook) (progn nil (or (and (memq (aref backend 0) cl-struct-or= g-export-backend-tags)) (signal (quote wrong-type-argument) (list (quote or= g-export-backend) backend))) (aref backend 1)))) (org-set-regexps-and-optio= ns) (org-update-radio-target-regexp) (setq info (org-export-install-filters= (org-combine-plists info (org-export-get-environment backend subtreep ext-= plist)))) (let ((backend-name (progn nil (or (and (memq ... cl-struct-org-e= xport-backend-tags)) (signal (quote wrong-type-argument) (list ... backend)= )) (aref backend 1)))) (let ((--dolist-tail-- (plist-get info :filter-optio= ns)) filter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (le= t ((result (funcall filter info backend-name))) (if result (progn (setq inf= o result)))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (org-macro-rep= lace-all (list (cons "author" (org-element-interpret-data (plist-= get info :author))) (cons "date" (let* ((date (plist-get info :da= te)) (value (or ... ""))) (if (and (consp date) (not ...) (eq ...= ...)) (format "(eval (if (org-string-nw-p \"$1\") %s %S))&q= uot; (format "(org-timestamp-format '%S \"$1\")" ..= .) value) value))) (cons "email" (org-element-interpret-data (pli= st-get info :email))) (cons "title" (org-element-interpret-data (= plist-get info :title))) (cons "results" "$1")) (quote = finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil visible= -only)) (org-export--merge-external-footnote-definitions tree) (org-export-= -prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (s= etq tree (org-export-filter-apply-functions (plist-get info :filter-parse-t= ree) tree info)) (setq info (org-combine-plists info (org-export-collect-tr= ee-properties tree info))) (let* ((body (org-element-normalize-string (or (= org-export-data tree info) ""))) (inner-template (cdr (assq (quot= e inner-template) (plist-get info :translate-alist)))) (full-body (org-expo= rt-filter-apply-functions (plist-get info :filter-body) (if (not (functionp= inner-template)) body (funcall inner-template body info)) info)) (template= (cdr (assq (quote template) (plist-get info :translate-alist))))) (org-no-= properties (org-export-filter-apply-functions (plist-get info :filter-final= -output) (if (or (not (functionp template)) body-only) full-body (funcall t= emplate full-body info)) info))))
=C2=A0 (save-current-buffer (se= t-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (qu= ote org-export-before-processing-hook) (progn nil (or (and (memq (aref back= end 0) cl-struct-org-export-backend-tags)) (signal (quote wrong-type-argume= nt) (list (quote org-export-backend) backend))) (aref backend 1))) (org-exp= ort-expand-include-keyword) (org-export--delete-comments) (org-macro-initia= lize-templates) (org-macro-replace-all org-macro-templates nil parsed-keywo= rds) (org-set-regexps-and-options) (org-update-radio-target-regexp) (org-ex= port-execute-babel-code) (org-set-regexps-and-options) (org-update-radio-ta= rget-regexp) (goto-char (point-min)) (save-excursion (run-hook-with-args (q= uote org-export-before-parsing-hook) (progn nil (or (and (memq ... cl-struc= t-org-export-backend-tags)) (signal (quote wrong-type-argument) (list ... b= ackend))) (aref backend 1)))) (org-set-regexps-and-options) (org-update-rad= io-target-regexp) (setq info (org-export-install-filters (org-combine-plist= s info (org-export-get-environment backend subtreep ext-plist)))) (let ((ba= ckend-name (progn nil (or (and ...) (signal ... ...)) (aref backend 1)))) (= let ((--dolist-tail-- (plist-get info :filter-options)) filter) (while --do= list-tail-- (setq filter (car --dolist-tail--)) (let ((result ...)) (if res= ult (progn ...))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (org-macr= o-replace-all (list (cons "author" (org-element-interpret-data (p= list-get info :author))) (cons "date" (let* ((date ...) (value ..= .)) (if (and ... ... ...) (format "(eval (if (org-string-nw-p \"$= 1\") %s %S))" ... value) value))) (cons "email" (org-el= ement-interpret-data (plist-get info :email))) (cons "title" (org= -element-interpret-data (plist-get info :title))) (cons "results"= "$1")) (quote finalize) parsed-keywords) (setq tree (org-element= -parse-buffer nil visible-only)) (org-export--merge-external-footnote-defin= itions tree) (org-export--prune-tree tree info) (org-export--remove-uninter= preted-data tree info) (setq tree (org-export-filter-apply-functions (plist= -get info :filter-parse-tree) tree info)) (setq info (org-combine-plists in= fo (org-export-collect-tree-properties tree info))) (let* ((body (org-eleme= nt-normalize-string (or (org-export-data tree info) ""))) (inner-= template (cdr (assq (quote inner-template) (plist-get info :translate-alist= )))) (full-body (org-export-filter-apply-functions (plist-get info :filter-= body) (if (not ...) body (funcall inner-template body info)) info)) (templa= te (cdr (assq (quote template) (plist-get info :translate-alist))))) (org-n= o-properties (org-export-filter-apply-functions (plist-get info :filter-fin= al-output) (if (or (not ...) body-only) full-body (funcall template full-bo= dy info)) info)))))
=C2=A0 (unwind-protect (save-current-buffer (= set-buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (= quote org-export-before-processing-hook) (progn nil (or (and (memq ... cl-s= truct-org-export-backend-tags)) (signal (quote wrong-type-argument) (list .= .. backend))) (aref backend 1))) (org-export-expand-include-keyword) (org-e= xport--delete-comments) (org-macro-initialize-templates) (org-macro-replace= -all org-macro-templates nil parsed-keywords) (org-set-regexps-and-options)= (org-update-radio-target-regexp) (org-export-execute-babel-code) (org-set-= regexps-and-options) (org-update-radio-target-regexp) (goto-char (point-min= )) (save-excursion (run-hook-with-args (quote org-export-before-parsing-hoo= k) (progn nil (or (and ...) (signal ... ...)) (aref backend 1)))) (org-set-= regexps-and-options) (org-update-radio-target-regexp) (setq info (org-expor= t-install-filters (org-combine-plists info (org-export-get-environment back= end subtreep ext-plist)))) (let ((backend-name (progn nil (or ... ...) (are= f backend 1)))) (let ((--dolist-tail-- (plist-get info :filter-options)) fi= lter) (while --dolist-tail-- (setq filter (car --dolist-tail--)) (let (...)= (if result ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (org-macr= o-replace-all (list (cons "author" (org-element-interpret-data (p= list-get info :author))) (cons "date" (let* (... ...) (if ... ...= value))) (cons "email" (org-element-interpret-data (plist-get in= fo :email))) (cons "title" (org-element-interpret-data (plist-get= info :title))) (cons "results" "$1")) (quote finalize)= parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)) (= org-export--merge-external-footnote-definitions tree) (org-export--prune-tr= ee tree info) (org-export--remove-uninterpreted-data tree info) (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-proper= ties tree info))) (let* ((body (org-element-normalize-string (or ... "= "))) (inner-template (cdr (assq ... ...))) (full-body (org-export-filt= er-apply-functions (plist-get info :filter-body) (if ... body ...) info)) (= template (cdr (assq ... ...)))) (org-no-properties (org-export-filter-apply= -functions (plist-get info :filter-final-output) (if (or ... body-only) ful= l-body (funcall template full-body info)) info))))) (and (buffer-live-p --b= uf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffe= r-modified-p nil)) (kill-buffer --buf-copy))))
=C2=A0 (let ((--bu= f-copy (org-export-copy-buffer))) (unwind-protect (save-current-buffer (set= -buffer --buf-copy) (goto-char (point-min)) (progn (run-hook-with-args (quo= te org-export-before-processing-hook) (progn nil (or (and ...) (signal ... = ...)) (aref backend 1))) (org-export-expand-include-keyword) (org-export--d= elete-comments) (org-macro-initialize-templates) (org-macro-replace-all org= -macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org-up= date-radio-target-regexp) (org-export-execute-babel-code) (org-set-regexps-= and-options) (org-update-radio-target-regexp) (goto-char (point-min)) (save= -excursion (run-hook-with-args (quote org-export-before-parsing-hook) (prog= n nil (or ... ...) (aref backend 1)))) (org-set-regexps-and-options) (org-u= pdate-radio-target-regexp) (setq info (org-export-install-filters (org-comb= ine-plists info (org-export-get-environment backend subtreep ext-plist)))) = (let ((backend-name (progn nil ... ...))) (let ((--dolist-tail-- ...) filte= r) (while --dolist-tail-- (setq filter ...) (let ... ...) (setq --dolist-ta= il-- ...)))) (org-macro-replace-all (list (cons "author" (org-ele= ment-interpret-data ...)) (cons "date" (let* ... ...)) (cons &quo= t;email" (org-element-interpret-data ...)) (cons "title" (or= g-element-interpret-data ...)) (cons "results" "$1")) (= quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil v= isible-only)) (org-export--merge-external-footnote-definitions tree) (org-e= xport--prune-tree tree info) (org-export--remove-uninterpreted-data tree in= fo) (setq tree (org-export-filter-apply-functions (plist-get info :filter-p= arse-tree) tree info)) (setq info (org-combine-plists info (org-export-coll= ect-tree-properties tree info))) (let* ((body (org-element-normalize-string= ...)) (inner-template (cdr ...)) (full-body (org-export-filter-apply-funct= ions ... ... info)) (template (cdr ...))) (org-no-properties (org-export-fi= lter-apply-functions (plist-get info :filter-final-output) (if ... full-bod= y ...) info))))) (and (buffer-live-p --buf-copy) (progn (save-current-buffe= r (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kill-buffer --b= uf-copy)))))
=C2=A0 (let* ((org-export-current-backend (progn nil= (or (and (memq (aref backend 0) cl-struct-org-export-backend-tags)) (signa= l (quote wrong-type-argument) (list (quote org-export-backend) backend))) (= aref backend 1))) (info (org-combine-plists (list :export-options (delq nil= (list (and subtreep ...) (and visible-only ...) (and body-only ...)))) (or= g-export--get-buffer-attributes))) (parsed-keywords (delq nil (mapcar (func= tion (lambda (o) (and ... ...))) (append (org-export-get-all-options backen= d) org-export-options-alist)))) tree) (let ((--buf-copy (org-export-copy-bu= ffer))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-= char (point-min)) (progn (run-hook-with-args (quote org-export-before-proce= ssing-hook) (progn nil (or ... ...) (aref backend 1))) (org-export-expand-i= nclude-keyword) (org-export--delete-comments) (org-macro-initialize-templat= es) (org-macro-replace-all org-macro-templates nil parsed-keywords) (org-se= t-regexps-and-options) (org-update-radio-target-regexp) (org-export-execute= -babel-code) (org-set-regexps-and-options) (org-update-radio-target-regexp)= (goto-char (point-min)) (save-excursion (run-hook-with-args (quote org-exp= ort-before-parsing-hook) (progn nil ... ...))) (org-set-regexps-and-options= ) (org-update-radio-target-regexp) (setq info (org-export-install-filters (= org-combine-plists info ...))) (let ((backend-name ...)) (let (... filter) = (while --dolist-tail-- ... ... ...))) (org-macro-replace-all (list (cons &q= uot;author" ...) (cons "date" ...) (cons "email" .= ..) (cons "title" ...) (cons "results" "$1"))= (quote finalize) parsed-keywords) (setq tree (org-element-parse-buffer nil= visible-only)) (org-export--merge-external-footnote-definitions tree) (org= -export--prune-tree tree info) (org-export--remove-uninterpreted-data tree = info) (setq tree (org-export-filter-apply-functions (plist-get info :filter= -parse-tree) tree info)) (setq info (org-combine-plists info (org-export-co= llect-tree-properties tree info))) (let* ((body ...) (inner-template ...) (= full-body ...) (template ...)) (org-no-properties (org-export-filter-apply-= functions ... ... info))))) (and (buffer-live-p --buf-copy) (progn (save-cu= rrent-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (kill= -buffer --buf-copy))))))
=C2=A0 (save-restriction (cond ((org-reg= ion-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* ((org-export-current-backend (progn nil= (or (and (memq ... cl-struct-org-export-backend-tags)) (signal (quote wron= g-type-argument) (list ... backend))) (aref backend 1))) (info (org-combine= -plists (list :export-options (delq nil (list ... ... ...))) (org-export--g= et-buffer-attributes))) (parsed-keywords (delq nil (mapcar (function (lambd= a ... ...)) (append (org-export-get-all-options backend) org-export-options= -alist)))) tree) (let ((--buf-copy (org-export-copy-buffer))) (unwind-prote= ct (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (pr= ogn (run-hook-with-args (quote org-export-before-processing-hook) (progn ni= l ... ...)) (org-export-expand-include-keyword) (org-export--delete-comment= s) (org-macro-initialize-templates) (org-macro-replace-all org-macro-templa= tes nil parsed-keywords) (org-set-regexps-and-options) (org-update-radio-ta= rget-regexp) (org-export-execute-babel-code) (org-set-regexps-and-options) = (org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion (r= un-hook-with-args ... ...)) (org-set-regexps-and-options) (org-update-radio= -target-regexp) (setq info (org-export-install-filters ...)) (let (...) (le= t ... ...)) (org-macro-replace-all (list ... ... ... ... ...) (quote finali= ze) parsed-keywords) (setq tree (org-element-parse-buffer nil visible-only)= ) (org-export--merge-external-footnote-definitions tree) (org-export--prune= -tree tree info) (org-export--remove-uninterpreted-data tree info) (setq tr= ee (org-export-filter-apply-functions ... tree info)) (setq info (org-combi= ne-plists info ...)) (let* (... ... ... ...) (org-no-properties ...)))) (an= d (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-= copy) (restore-buffer-modified-p nil)) (kill-buffer --buf-copy)))))))
=
=C2=A0 (save-excursion (save-restriction (cond ((org-region-active-p) = (narrow-to-region (region-beginning) (region-end))) (subtreep (org-narrow-t= o-subtree) (goto-char (point-min)) (forward-line) (narrow-to-region (point)= (point-max)))) (let* ((org-export-current-backend (progn nil (or (and ...)= (signal ... ...)) (aref backend 1))) (info (org-combine-plists (list :expo= rt-options (delq nil ...)) (org-export--get-buffer-attributes))) (parsed-ke= ywords (delq nil (mapcar (function ...) (append ... org-export-options-alis= t)))) tree) (let ((--buf-copy (org-export-copy-buffer))) (unwind-protect (s= ave-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (progn (= run-hook-with-args ... ...) (org-export-expand-include-keyword) (org-export= --delete-comments) (org-macro-initialize-templates) (org-macro-replace-all = org-macro-templates nil parsed-keywords) (org-set-regexps-and-options) (org= -update-radio-target-regexp) (org-export-execute-babel-code) (org-set-regex= ps-and-options) (org-update-radio-target-regexp) (goto-char ...) (save-excu= rsion ...) (org-set-regexps-and-options) (org-update-radio-target-regexp) (= setq info ...) (let ... ...) (org-macro-replace-all ... ... parsed-keywords= ) (setq tree ...) (org-export--merge-external-footnote-definitions tree) (o= rg-export--prune-tree tree info) (org-export--remove-uninterpreted-data tre= e info) (setq tree ...) (setq info ...) (let* ... ...))) (and (buffer-live-= p --buf-copy) (progn (save-current-buffer ... ...) (kill-buffer --buf-copy)= )))))))
=C2=A0 org-export-as(html nil nil nil (:output-file "= ;./tmp.html"))
=C2=A0 (let ((output (org-export-as backend s= ubtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-ne= w-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffe= r) (unwind-protect (progn (insert output) (let ((coding-system-for-write en= coding)) (write-file file))) (and (buffer-name temp-buffer) (kill-buffer te= mp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p = output)) (progn (org-kill-new output))) (or (and (functionp post-process) (= funcall post-process file)) file))
=C2=A0 (if async (let ((with-t= emp-message "Initializing asynchronous export process") (current-= message)) (unwind-protect (progn (if with-temp-message (progn (setq current= -message (current-message)) (message "%s" with-temp-message))) (l= et ((--copy-fun (org-export--generate-copy-script ...)) (--temp-file (make-= temp-file "org-export-process")) (--coding buffer-file-coding-sys= tem)) (let ((temp-file --temp-file) (temp-buffer ...)) (unwind-protect (pro= g1 ... ...) (and ... ...))) (let* ((process-connection-type nil) (--proc-bu= ffer ...) (--process ...)) (org-export-add-to-stack (get-buffer --proc-buff= er) nil --process) (let (...) (set-process-sentinel --process ...))))) (and= with-temp-message (if current-message (message "%s" current-mess= age) (message nil))))) (let ((output (org-export-as backend subtreep visibl= e-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer "= ; *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-pro= tect (progn (insert output) (let (...) (write-file file))) (and (buffer-nam= e temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-= kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (= and (functionp post-process) (funcall post-process file)) file)))
=C2=A0 (let ((ext-plist (org-combine-plists (list (quote :output-file) fil= e) ext-plist)) (encoding (or org-export-coding-system buffer-file-coding-sy= stem))) (if async (let ((with-temp-message "Initializing asynchronous = export process") (current-message)) (unwind-protect (progn (if with-te= mp-message (progn (setq current-message ...) (message "%s" with-t= emp-message))) (let ((--copy-fun ...) (--temp-file ...) (--coding buffer-fi= le-coding-system)) (let (... ...) (unwind-protect ... ...)) (let* (... ... = ...) (org-export-add-to-stack ... nil --process) (let ... ...)))) (and with= -temp-message (if current-message (message "%s" current-message) = (message nil))))) (let ((output (org-export-as backend subtreep visible-onl= y body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *te= mp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect = (progn (insert output) (let ... ...)) (and (buffer-name temp-buffer) (kill-= buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-str= ing-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-p= rocess) (funcall post-process file)) file))))
=C2=A0 (if (not (fi= le-writable-p file)) (error "Output file not writable") (let ((ex= t-plist (org-combine-plists (list (quote :output-file) file) ext-plist)) (e= ncoding (or org-export-coding-system buffer-file-coding-system))) (if async= (let ((with-temp-message "Initializing asynchronous export process&qu= ot;) (current-message)) (unwind-protect (progn (if with-temp-message (progn= ... ...)) (let (... ... ...) (let ... ...) (let* ... ... ...))) (and with-= temp-message (if current-message (message "%s" current-message) (= message nil))))) (let ((output (org-export-as backend subtreep visible-only= body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *tem= p*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (= progn ... ...) (and ... ...)))) (if (and (org-export--copy-to-kill-ring-p) = (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (function= p post-process) (funcall post-process file)) file)))))
=C2=A0 org= -export-to-file(html "./tmp.html" nil nil nil nil nil)
= =C2=A0 (let* ((extension (concat "." (or (plist-get ext-plist :ht= ml-extension) org-html-extension "html"))) (file (org-export-outp= ut-file-name extension subtreep)) (org-export-coding-system org-html-coding= -system)) (org-export-to-file (quote html) file async subtreep visible-only= body-only ext-plist))
=C2=A0 org-html-export-to-html()
=C2=A0 funcall-interactively(org-html-export-to-html)
=C2=A0 cal= l-interactively(org-html-export-to-html record nil)
=C2=A0 comman= d-execute(org-html-export-to-html record)
=C2=A0 helm-M-x(nil &qu= ot;org-html-export-to-html")
=C2=A0 funcall-interactively(he= lm-M-x nil "org-html-export-to-html")
=C2=A0 call-inter= actively(helm-M-x nil nil)
=C2=A0 command-execute(helm-M-x)
=



On Thu, Mar 10, 2016 at 7:46 AM Shlomi Vaknin <shlomivaknin@gmail.com> = wrote:

Its been in master since Jan 2015.
Yeah, I= guess I didnt update my packages in quite a while :P
=C2=A0

 It works for me as does the same with `emacs-lisp' as the language
under latex or html export to buffer or file using: Org-mode version
8.3.4 (release_8.3.4-635-g268486 ...) producing the expected document.

Not sure what gives. Perhaps a mixed installation of org-mode?
=C2=A0
So I checked this (to = the best of my knowledge), I searched and removed everything that had to do= with org-mode, got master, compiled and installed it. (org-version) now gi= ves "Org-mode version 8.3.4 (release_8.3.4-635-g268486 @ ~/org-mode/or= g-mode/lisp/)"

and although the minimal examp= le I posted above *does* work now, my real file does not. I managed to make= another non-working example (should I make a gif showing what I see?):
=

---------------------------------------
=C2=A0- src_elisp{3} {{{results(=3D3=3D)}}}

= * B
=C2=A0 - src_elisp{3} {{{results(=3D3=3D)}}}
=C2=A0= -
=C2=A0 -
=C2=A0 -
=C2=A0 - src_elisp{3} {{= {results(=3D3=3D)}}}
=C2=A0 - src_elisp{2} {{{results(=3D2=3D)}}}=
=C2=A0 - {{{results(=3D2=3D)}}}
----------------------= -----------------

again, removing any li= ne from this makes export work again. Otherwise I get =3Dorg-element--curre= nt-element: Wrong type argument: integer-or-marker-p, nil=3D

=
This might be something silly, but I really dont know what else = to do and I am quite stuck, I need to present my org file to emacs-hostile = people :|=C2=A0

I have a new installation of emacs= (used =3Dfind=3D to remove all other emacs paths), new org-mode compiled f= rom source (looked through =3Dfind=3D as well as checked all 'load-path= locations and removed anything I found) and no custom init files.... What = else could I check on my system?

I am using a mac,= if that makes any differences..

Thanks for your h= elp!



--001a11c244b064062e052dabffff--