[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [New exporter] Error: (wrong-type-argument stringp nil)
From: |
Sebastien Vauban |
Subject: |
[O] [New exporter] Error: (wrong-type-argument stringp nil) |
Date: |
Wed, 06 Feb 2013 10:24:23 +0100 |
User-agent: |
Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.2.91 (windows-nt) |
Hello,
Trying to convert some more files (to HTML) with the new exporter, I did a
test with the following one:
--8<---------------cut here---------------start------------->8---
#+TITLE: ECM for HTML export error
#+LANGUAGE: en_US
* Tasks
*** TODO Read article
- [[https://lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html][new
exporter: exporting subtree as beamer]]
--8<---------------cut here---------------end--------------->8---
When exporting it to HTML (`C-c C-e h o'), I get the following error:
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
regexp-quote(nil)
(string-match (regexp-quote (car att)) desc)
(and desc (string-match (regexp-quote (car att)) desc))
(if (and desc (string-match (regexp-quote (car att)) desc)) nil att)
(let ((att (org-element-property :attr_html (org-export-get-parent-element
link)))) (if (and desc (string-match (regexp-quote (car att)) desc)) nil att))
(mapconcat (quote identity) (let ((att (org-element-property :attr_html
(org-export-get-parent-element link)))) (if (and desc (string-match
(regexp-quote (car att)) desc)) nil att)) " ")
(setq attributes (mapconcat (quote identity) (let ((att (org-element-property
:attr_html (org-export-get-parent-element link)))) (if (and desc (string-match
(regexp-quote (car att)) desc)) nil att)) " "))
(and (setq attributes (mapconcat (quote identity) (let ((att
(org-element-property :attr_html (org-export-get-parent-element link)))) (if
(and desc (string-match (regexp-quote ...) desc)) nil att)) " ")) (setq
attributes (concat " " attributes)))
(let* ((--link-org-files-as-html-maybe (function (lambda (raw-path info)
"Treat links to `file.org' as links to `file.html', if needed.\n See
`org-e-html-link-org-files-as-html'." (cond ((and
org-e-html-link-org-files-as-html ...) (concat ... "." ...)) (t raw-path)))))
(type (org-element-property :type link)) (raw-path (org-element-property :path
link)) (desc (and (not (string= desc "")) desc)) (path (cond ((member type
(quote ("http" "https" "ftp" "mailto"))) (concat type ":" raw-path)) ((string=
type "file") (setq raw-path (funcall --link-org-files-as-html-maybe raw-path
info)) (if (not (file-name-absolute-p raw-path)) raw-path (concat "file://"
(expand-file-name raw-path)))) (t raw-path))) attributes protocol) (and (setq
attributes (mapconcat (quote identity) (let ((att (org-element-property
:attr_html ...))) (if (and desc (string-match ... desc)) nil att)) " ")) (setq
attributes (concat " " attributes))) (cond ((and (or (eq t
org-e-html-inline-images) (and org-e-html-inline-images (not desc)))
(org-export-inline-image-p link org-e-html-inline-image-rules))
(org-e-html-link--inline-image link desc info)) ((string= type "radio") (let
((destination (org-export-resolve-radio-link link info))) (if destination
(progn (format "<a href=\"#%s\"%s>%s</a>" (org-export-solidify-link-text path)
attributes (org-export-data ... info)))))) ((member type (quote ("custom-id"
"fuzzy" "id"))) (let ((destination (if (string= type "fuzzy")
(org-export-resolve-fuzzy-link link info) (org-export-resolve-id-link link
info)))) (let ((--cl-var-- (org-element-type destination))) (cond ((eql
--cl-var-- ...) (progn ... nil) (let ... ...)) ((memql --cl-var-- ...) (format
"<i>%s</i>" ...)) ((eql --cl-var-- ...) nil) ((eql --cl-var-- ...) (let ...
...)) (t (let ... ... ...)))))) ((string= type "coderef") (let ((fragment
(concat "coderef-" path))) (format "<a href=\"#%s\" %s%s>%s</a>" fragment
(format (concat "class=\"coderef\"" " onmouseover=\"CodeHighlightOn(this,
'%s');\"" " onmouseout=\"CodeHighlightOff(this, '%s');\"") fragment fragment)
attributes (format (org-export-get-coderef-format path desc)
(org-export-resolve-coderef path info))))) ((functionp (setq protocol (nth 2
(assoc type org-link-protocols)))) (funcall protocol (org-link-unescape path)
desc (quote html))) ((and path desc) (format "<a href=\"%s\"%s>%s</a>" path
attributes desc)) (path (format "<a href=\"%s\"%s>%s</a>" path attributes
path)) (t (format "<i>%s</i>" desc))))
org-e-html-link((link (:type "https" :path
"//lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html" :raw-link
"https://lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html"
:application nil :search-option nil :begin 118 :end 235 :contents-begin 192
:contents-end 233 :post-blank 0 :parent (paragraph (:begin 118 :end 236
:contents-begin 118 :contents-end 236 :post-blank 0 :post-affiliated 118
:parent (item (:bullet "- " :begin 116 :end 236 :contents-begin 118
:contents-end 236 :checkbox nil :counter nil :hiddenp nil :structure ((116 0 "-
" nil nil nil 236)) :post-blank 0 :tag nil :parent (plain-list (:type unordered
:begin 116 :end 236 :contents-begin 116 :contents-end 236 :structure ...
:post-blank 0 :post-affiliated 116 :parent ...) #4)) #2)) #0 #("\n" 0 1
(:parent #2)))) #("new exporter: exporting subtree as beamer" 0 41 (:parent
#0))) #("new exporter: exporting subtree as beamer" 0 41 (:parent (link (:type
"https" :path
"//lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html" :raw-link
"https://lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html"
:application nil :search-option nil :begin 118 :end 235 :contents-begin 192
:contents-end 233 :post-blank 0 :parent (paragraph (:begin 118 :end 236
:contents-begin 118 :contents-end 236 :post-blank 0 :post-affiliated 118
:parent (item (:bullet "- " :begin 116 :end 236 :contents-begin 118
:contents-end 236 :checkbox nil :counter nil :hiddenp nil :structure ...
:post-blank 0 :tag nil :parent ...) #4)) #2 #("\n" 0 1 (:parent #4)))) #("new
exporter: exporting subtree as beamer" 0 41 (:parent #2))))) (:input-file
"d:/Users/fni/src/ecm-html.txt" :title ("ECM for HTML export error") :author
("Seb Vauban") :creator "Generated by <a href=\"http://orgmode.org\">Org</a>
mode 7.9.3e in <a href=\"http://www.gnu.org/software/emacs/\">Emacs</a>
24.2.91.1." :date nil :description nil :email "address@hidden" :exclude-tags
("noexport") :headline-levels 3 :keywords nil :language "en_US"
:preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator nil :with-date t :with-drawers nil :with-email nil
:with-emphasize t :with-entities t :with-fixed-width t ...))
funcall(org-e-html-link (link (:type "https" :path
"//lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html" :raw-link
"https://lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html"
:application nil :search-option nil :begin 118 :end 235 :contents-begin 192
:contents-end 233 :post-blank 0 :parent (paragraph (:begin 118 :end 236
:contents-begin 118 :contents-end 236 :post-blank 0 :post-affiliated 118
:parent (item (:bullet "- " :begin 116 :end 236 :contents-begin 118
:contents-end 236 :checkbox nil :counter nil :hiddenp nil :structure ((116 0 "-
" nil nil nil 236)) :post-blank 0 :tag nil :parent (plain-list (:type unordered
:begin 116 :end 236 :contents-begin 116 :contents-end 236 :structure ...
:post-blank 0 :post-affiliated 116 :parent ...) #4)) #2)) #0 #("\n" 0 1
(:parent #2)))) #("new exporter: exporting subtree as beamer" 0 41 (:parent
#0))) #("new exporter: exporting subtree as beamer" 0 41 (:parent (link (:type
"https" :path
"//lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html" :raw-link
"https://lists.gnu.org/archive/html/emacs-orgmode/2012-09/msg01099.html"
:application nil :search-option nil :begin 118 :end 235 :contents-begin 192
:contents-end 233 :post-blank 0 :parent (paragraph (:begin 118 :end 236
:contents-begin 118 :contents-end 236 :post-blank 0 :post-affiliated 118
:parent (item (:bullet "- " :begin 116 :end 236 :contents-begin 118
:contents-end 236 :checkbox nil :counter nil :hiddenp nil :structure ...
:post-blank 0 :tag nil :parent ...) #4)) #2 #("\n" 0 1 (:parent #4)))) #("new
exporter: exporting subtree as beamer" 0 41 (:parent #2))))) (:input-file
"d:/Users/fni/src/ecm-html.txt" :title ("ECM for HTML export error") :author
("Seb Vauban") :creator "Generated by <a href=\"http://orgmode.org\">Org</a>
mode 7.9.3e in <a href=\"http://www.gnu.org/software/emacs/\">Emacs</a>
24.2.91.1." :date nil :description nil :email "address@hidden" :exclude-tags
("noexport") :headline-levels 3 :keywords nil :language "en_US"
:preserve-breaks nil :section-numbers t :select-tags ("export")
:time-stamp-file t :with-archived-trees headline :with-author t :with-clocks
nil :with-creator nil :with-date t :with-drawers nil :with-email nil
:with-emphasize t :with-entities t :with-fixed-width t ...))
[...]
org-export-dispatch(nil)
call-interactively(org-export-dispatch nil nil)
--8<---------------cut here---------------end--------------->8---
Best regards,
Seb
--
Sebastien Vauban
- [O] [New exporter] Error: (wrong-type-argument stringp nil),
Sebastien Vauban <=