Merge branch 'maint'

This commit is contained in:
Nicolas Goaziou 2014-03-29 14:42:08 +01:00
commit f261833a26
1 changed files with 2 additions and 1 deletions

View File

@ -813,7 +813,8 @@ Default for SITEMAP-FILENAME is 'sitemap.org'."
(org-mode)
(let ((title
(let ((property (plist-get (org-export-get-environment) :title)))
(if property (org-element-interpret-data property)
(if property
(org-no-properties (org-element-interpret-data property))
(file-name-nondirectory (file-name-sans-extension file))))))
(unless visiting (kill-buffer buffer))
(org-publish-cache-set-file-property file :title title)