Hi Jambunathan
On Sat, Jun 2, 2012 at 5:18 PM, Jambunathan K <kjambunat...@gmail.com> wrote:
> After sending out the email, I realized that `org-e-odt-prettify-xml' is
> ON by default in the org-e-odt.el. Now I have turned it off.
>
> Hopefully things are OK at your end with this "fix".
Thank you for looking into this.
I just pulled and now get a backtrace when trying this:
cd /f/xmirror/git/org-mode
git pull
git describe
==> release_7.8.10-642-gca6f523
make cleanall info autoloads
(/Applications/Emacs.app/Contents/MacOS/Emacs -Q \
-L "/f/xmirror/git/org-mode/lisp/" \
-L "/f/xmirror/git/org-mode/contrib/lisp/" &)
M-x load-library RET org-e-odt RET
C-x C-f release_7.8.10-633.org RET
M-x org-export-dispatch RET o
==> see attached backtrace
> I am still curious
> what mode does mimetype file open for you. (Do M-: mode-name in mimetype
> buffer)
"M-: mode-name RET" shows "Fundamental".
Michael
Debugger entered--Lisp error: (void-function org-e-html-encode-plain-text)
(org-e-html-encode-plain-text line)
(setq line (org-e-html-encode-plain-text line))
org-e-odt-encode-plain-text("a" t)
(setq text (org-e-odt-encode-plain-text text t))
org-e-odt-plain-text("a" (:author "br" :creator "Generated by Org mode 7.8.10
in Emacs 23.3.1." :date nil :description nil :email "b@aHostName" :exclude-tags
("noexport") :headline-levels 3 :keywords nil :language "en" :preserve-breaks
nil :section-numbers t :select-tags ("export") :time-stamp-file t :title
"release_7.8.10-633" :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-drawers t :with-email nil :with-emphasize t
:with-entities t :with-fixed-width t :with-footnotes t :with-plannings nil ...))
funcall(org-e-odt-plain-text "a" (:author "br" :creator "Generated by Org
mode 7.8.10 in Emacs 23.3.1." :date nil :description nil :email "b@aHostName"
:exclude-tags ("noexport") :headline-levels 3 :keywords nil :language "en"
:preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :title "release_7.8.10-633" :with-archived-trees headline
:with-author t :with-clocks nil :with-creator comment :with-drawers t
:with-email nil :with-emphasize t :with-entities t :with-fixed-width t
:with-footnotes t :with-plannings nil ...))
(if transcoder (funcall transcoder data info) data)
(let ((transcoder ...)) (if transcoder (funcall transcoder data info) data))
(org-export-filter-apply-functions (plist-get info :filter-plain-text) (let
(...) (if transcoder ... data)) info)
(cond ((member data ...) nil) ((eq type ...)
(org-export-filter-apply-functions ... ... info)) ((not ...) (org-export-data
... info)) ((not type) (mapconcat ... data "")) ((or ... ...) (let ... ...)) (t
(let ... ...)))
(let* ((type ...) (results ...)) (cond (... nil) (... results) (t ...)))
org-export-data("a" (:author "br" :creator "Generated by Org mode 7.8.10 in
Emacs 23.3.1." :date nil :description nil :email "b@aHostName" :exclude-tags
("noexport") :headline-levels 3 :keywords nil :language "en" :preserve-breaks
nil :section-numbers t :select-tags ("export") :time-stamp-file t :title
"release_7.8.10-633" :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-drawers t :with-email nil :with-emphasize t
:with-entities t :with-fixed-width t :with-footnotes t :with-plannings nil ...))
(lambda (obj) (org-export-data obj info))("a")
mapconcat((lambda (obj) (org-export-data obj info)) ("a") "")
(cond ((member data ...) nil) ((eq type ...)
(org-export-filter-apply-functions ... ... info)) ((not ...) (org-export-data
... info)) ((not type) (mapconcat ... data "")) ((or ... ...) (let ... ...)) (t
(let ... ...)))
(let* ((type ...) (results ...)) (cond (... nil) (... results) (t ...)))
org-export-data(("a") (:author "br" :creator "Generated by Org mode 7.8.10 in
Emacs 23.3.1." :date nil :description nil :email "b@aHostName" :exclude-tags
("noexport") :headline-levels 3 :keywords nil :language "en" :preserve-breaks
nil :section-numbers t :select-tags ("export") :time-stamp-file t :title
"release_7.8.10-633" :with-archived-trees headline :with-author t :with-clocks
nil :with-creator comment :with-drawers t :with-email nil :with-emphasize t
:with-entities t :with-fixed-width t :with-footnotes t :with-plannings nil ...))
(let* ((numberedp ...) (level ...) (text ...) (full-text ...)) (cond (...
nil) (... ...) (t ...)))
org-e-odt-headline((headline (:raw-value "a" :title ("a") :begin 1 :end 5
:pre-blank 0 :hiddenp nil :contents-begin 5 :contents-end 5 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :scheduled nil :deadline nil
:timestamp nil :clock nil :post-blank 0 :footnote-section-p nil :archivedp nil
:commentedp nil :quotedp nil :category nil)) nil (:author "br" :creator
"Generated by Org mode 7.8.10 in Emacs 23.3.1." :date nil :description nil
:email "b@aHostName" :exclude-tags ("noexport") :headline-levels 3 :keywords
nil :language "en" :preserve-breaks nil :section-numbers t :select-tags
("export") :time-stamp-file t :title "release_7.8.10-633" :with-archived-trees
headline :with-author t :with-clocks nil :with-creator comment :with-drawers t
:with-email nil :with-emphasize t :with-entities t :with-fixed-width t
:with-footnotes t :with-plannings nil ...))
funcall(org-e-odt-headline (headline (:raw-value "a" :title ("a") :begin 1
:end 5 :pre-blank 0 :hiddenp nil :contents-begin 5 :contents-end 5 :level 1
:priority nil :tags nil :todo-keyword nil :todo-type nil :scheduled nil
:deadline nil :timestamp nil :clock nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :category nil)) nil (:author "br"
:creator "Generated by Org mode 7.8.10 in Emacs 23.3.1." :date nil :description
nil :email "b@aHostName" :exclude-tags ("noexport") :headline-levels 3
:keywords nil :language "en" :preserve-breaks nil :section-numbers t
:select-tags ("export") :time-stamp-file t :title "release_7.8.10-633"
:with-archived-trees headline :with-author t :with-clocks nil :with-creator
comment :with-drawers t :with-email nil :with-emphasize t :with-entities t
:with-fixed-width t :with-footnotes t :with-plannings nil ...))
(and (fboundp transcoder) (funcall transcoder data nil info))
(let ((transcoder ...)) (and (fboundp transcoder) (funcall transcoder data
nil info)))
(cond ((member data ...) nil) ((eq type ...)
(org-export-filter-apply-functions ... ... info)) ((not ...) (org-export-data
... info)) ((not type) (mapconcat ... data "")) ((or ... ...) (let ... ...)) (t
(let ... ...)))
(let* ((type ...) (results ...)) (cond (... nil) (... results) (t ...)))
org-export-data((headline (:raw-value "a" :title ("a") :begin 1 :end 5
:pre-blank 0 :hiddenp nil :contents-begin 5 :contents-end 5 :level 1 :priority
nil :tags nil :todo-keyword nil :todo-type nil :scheduled nil :deadline nil
:timestamp nil :clock nil :post-blank 0 :footnote-section-p nil :archivedp nil
:commentedp nil :quotedp nil :category nil)) (:author "br" :creator "Generated
by Org mode 7.8.10 in Emacs 23.3.1." :date nil :description nil :email
"b@aHostName" :exclude-tags ("noexport") :headline-levels 3 :keywords nil
:language "en" :preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :title "release_7.8.10-633" :with-archived-trees headline
:with-author t :with-clocks nil :with-creator comment :with-drawers t
:with-email nil :with-emphasize t :with-entities t :with-fixed-width t
:with-footnotes t :with-plannings nil ...))
(lambda (element) (org-export-data element info))((headline (:raw-value "a"
:title ("a") :begin 1 :end 5 :pre-blank 0 :hiddenp nil :contents-begin 5
:contents-end 5 :level 1 :priority nil :tags nil :todo-keyword nil :todo-type
nil :scheduled nil :deadline nil :timestamp nil :clock nil :post-blank 0
:footnote-section-p nil :archivedp nil :commentedp nil :quotedp nil :category
nil)))
mapconcat((lambda (element) (org-export-data element info)) ((headline
(:raw-value "a" :title ... :begin 1 :end 5 :pre-blank 0 :hiddenp nil
:contents-begin 5 :contents-end 5 :level 1 :priority nil :tags nil
:todo-keyword nil :todo-type nil :scheduled nil :deadline nil :timestamp nil
:clock nil :post-blank 0 :footnote-section-p nil :archivedp nil :commentedp nil
:quotedp nil :category nil))) "")
(let* ((greaterp ...) (objectp ...) (contents ...)) (funcall transcoder data
(if greaterp ... contents) info))
(progn (let* (... ... ...) (funcall transcoder data ... info)))
(if transcoder (progn (let* ... ...)))
(when transcoder (let* (... ... ...) (funcall transcoder data ... info)))
(let ((transcoder ...)) (when transcoder (let* ... ...)))
(cond ((member data ...) nil) ((eq type ...)
(org-export-filter-apply-functions ... ... info)) ((not ...) (org-export-data
... info)) ((not type) (mapconcat ... data "")) ((or ... ...) (let ... ...)) (t
(let ... ...)))
(let* ((type ...) (results ...)) (cond (... nil) (... results) (t ...)))
org-export-data((org-data nil (headline (:raw-value "a" :title ... :begin 1
:end 5 :pre-blank 0 :hiddenp nil :contents-begin 5 :contents-end 5 :level 1
:priority nil :tags nil :todo-keyword nil :todo-type nil :scheduled nil
:deadline nil :timestamp nil :clock nil :post-blank 0 :footnote-section-p nil
:archivedp nil :commentedp nil :quotedp nil :category nil))) (:author "br"
:creator "Generated by Org mode 7.8.10 in Emacs 23.3.1." :date nil :description
nil :email "b@aHostName" :exclude-tags ("noexport") :headline-levels 3
:keywords nil :language "en" :preserve-breaks nil :section-numbers t
:select-tags ("export") :time-stamp-file t :title "release_7.8.10-633"
:with-archived-trees headline :with-author t :with-clocks nil :with-creator
comment :with-drawers t :with-email nil :with-emphasize t :with-entities t
:with-fixed-width t :with-footnotes t :with-plannings nil ...))
(org-element-normalize-string (org-export-data tree info))
(let* ((body ...) (template ...) (output ...)) (when
org-export-copy-to-kill-ring (org-kill-new output)) output)
(let ((info ...) (tree ...)) (setq tree (org-export-filter-apply-functions
... tree info)) (setq info (org-combine-plists info ...)) (let* (... ... ...)
(when org-export-copy-to-kill-ring ...) output))
(save-restriction (cond (... ...) (subtreep ... ... ... ...)) (let (... ...)
(setq tree ...) (setq info ...) (let* ... ... output)))
(save-excursion (save-restriction (cond ... ...) (let ... ... ... ...)))
org-export-as(e-odt nil nil nil nil nil)
(let ((out ...) (buffer ...)) (with-current-buffer buffer (erase-buffer)
(insert out) (goto-char ...)) buffer)
org-export-to-buffer(e-odt #<buffer content.xml> nil nil nil)
(let* ((outbuf ...) (target ...) (outdir ...) (default-directory outdir))
(setq org-current-export-file (file-name-directory ...)) (org-export-to-buffer
(quote e-odt) outbuf (memq ... optns) (memq ... optns) (memq ... optns)) (setq
org-lparse-opt-plist nil) (org-e-odt-save-as-outfile target nil) (if (not
org-e-odt-preferred-output-format) target (or ... target)))
org-e-odt-export-to-odt(nil nil nil)
(cond ((eql --cl-var-- ...) nil) ((member* --cl-var-- ...) (require ...) (let
... ... ...)) ((member* --cl-var-- ...) (require ...)
(org-e-ascii-export-to-ascii ... ... ... ...)) ((eql --cl-var-- ...) (require
...) (let ... ... ...)) ((eql --cl-var-- ...) (require ...)
(org-e-latex-export-to-latex ... ... ... ...)) ((eql --cl-var-- ...) (require
...) (org-e-latex-export-to-pdf ... ... ...)) ((eql --cl-var-- ...) (require
...) (org-open-file ...)) ((eql --cl-var-- ...) (require ...) (let ... ...
...)) ((eql --cl-var-- ...) (require ...) (org-e-html-export-to-html ... ...
...)) ((eql --cl-var-- ...) (require ...) (org-open-file ...)) ((eql --cl-var--
...) (require ...) (org-e-odt-export-to-odt ... ... ...)) ((eql --cl-var-- ...)
(require ...) (org-open-file ...)) ((eql --cl-var-- ...) (require ...)
(org-e-publish-current-file ...)) ((eql --cl-var-- ...) (require ...)
(org-e-publish-current-project ...)) ((eql --cl-var-- ...) (require ...) (let
... ...)) ((eql --cl-var-- ...) (require ...) (org-e-publish-all ...)) (t
(error "No command associated with key %s" ...)))
(let ((--cl-var-- ...)) (cond (... nil) (... ... ...) (... ... ...) (... ...
...) (... ... ...) (... ... ...) (... ... ...) (... ... ...) (... ... ...) (...
... ...) (... ... ...) (... ... ...) (... ... ...) (... ... ...) (... ... ...)
(... ... ...) (t ...)))
(case (if (< raw-key 27) (+ raw-key 96) raw-key) (113 nil) ((65 78 85)
(require ...) (let ... ... ...)) ((97 110 117) (require ...)
(org-e-ascii-export-to-ascii ... ... ... ...)) (76 (require ...) (let ... ...
...)) (108 (require ...) (org-e-latex-export-to-latex ... ... ... ...)) (112
(require ...) (org-e-latex-export-to-pdf ... ... ...)) (100 (require ...)
(org-open-file ...)) (72 (require ...) (let ... ... ...)) (104 (require ...)
(org-e-html-export-to-html ... ... ...)) (98 (require ...) (org-open-file ...))
(111 (require ...) (org-e-odt-export-to-odt ... ... ...)) (79 (require ...)
(org-open-file ...)) (70 (require ...) (org-e-publish-current-file ...)) (80
(require ...) (org-e-publish-current-project ...)) (88 (require ...) (let ...
...)) (69 (require ...) (org-e-publish-all ...)) (t (error "No command
associated with key %s" ...)))
(let* ((input ...) (raw-key ...) (optns ...)) (case (if ... ... raw-key) (113
nil) (... ... ...) (... ... ...) (76 ... ...) (108 ... ...) (112 ... ...) (100
... ...) (72 ... ...) (104 ... ...) (98 ... ...) (111 ... ...) (79 ... ...) (70
... ...) (80 ... ...) (88 ... ...) (69 ... ...) (t ...)))
org-export-dispatch()
call-interactively(org-export-dispatch t nil)
execute-extended-command(nil)
call-interactively(execute-extended-command nil nil)
