org-e-publish: Fix type mismatch error

* contrib/lisp/org-e-publish.el (org-e-publish-find-title): Store
  title as a string, not as a secondary string.
This commit is contained in:
Nicolas Goaziou 2012-10-06 19:44:04 +02:00
parent f461a10532
commit 36306bae4e
1 changed files with 2 additions and 1 deletions

View File

@ -864,7 +864,8 @@ Default for SITEMAP-FILENAME is 'sitemap.org'."
(with-current-buffer buffer (with-current-buffer buffer
(org-mode) (org-mode)
(setq title (setq title
(or (plist-get (org-export-get-environment) :title) (or (org-element-interpret-data
(plist-get (org-export-get-environment) :title))
(file-name-nondirectory (file-name-sans-extension file))))) (file-name-nondirectory (file-name-sans-extension file)))))
(unless visiting (kill-buffer buffer)) (unless visiting (kill-buffer buffer))
(org-e-publish-cache-set-file-property file :title title) (org-e-publish-cache-set-file-property file :title title)