check html-link-home exists before triming

Ensure that the :html-link-home property exists before passing it to
  `org-trim' which assumes it's argument is a string.
This commit is contained in:
Eric Schulte 2013-07-29 15:19:22 -06:00 committed by Bastien Guerry
parent 99a8d97ffa
commit db9f11a860
1 changed files with 2 additions and 1 deletions

View File

@ -2598,7 +2598,8 @@ images, set it to:
DESC is the description part of the link, or the empty string.
INFO is a plist holding contextual information. See
`org-export-data'."
(let* ((home (org-trim (plist-get info :html-link-home)))
(let* ((home (when (plist-get info :html-link-home)
(org-trim (plist-get info :html-link-home))))
(use-abs-url (plist-get info :html-link-use-abs-url))
(link-org-files-as-html-maybe
(function