mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-26 05:02:53 +00:00
org-html.el (org-html-expand): Return nil if STRING is nil.
* org-html.el (org-html-expand): Prevent a nil value for STRING to return an error, just return nil.
This commit is contained in:
parent
25bd31ae36
commit
97d107d981
|
@ -2310,7 +2310,9 @@ Possible conversions are set in `org-export-html-protect-char-alist'."
|
|||
|
||||
(defun org-html-expand (string)
|
||||
"Prepare STRING for HTML export. Apply all active conversions.
|
||||
If there are links in the string, don't modify these."
|
||||
If there are links in the string, don't modify these. If STRING
|
||||
is nil, return nil."
|
||||
(when string
|
||||
(let* ((re (concat org-bracket-link-regexp "\\|"
|
||||
(org-re "[ \t]+\\(:[[:alnum:]_@#%:]+:\\)[ \t]*$")))
|
||||
m s l res)
|
||||
|
@ -2321,7 +2323,7 @@ If there are links in the string, don't modify these."
|
|||
(push (org-html-do-expand s) res)
|
||||
(push l res))
|
||||
(push (org-html-do-expand string) res)
|
||||
(apply 'concat (nreverse res))))
|
||||
(apply 'concat (nreverse res)))))
|
||||
|
||||
(defun org-html-do-expand (s)
|
||||
"Apply all active conversions to translate special ASCII to HTML."
|
||||
|
|
Loading…
Reference in a new issue