mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

ox: Always insert creator in metadata 

* ox-odt.el (org-odt-template): Always insert creator.
* ox-latex.el (org-latex--format-spec): Creator always available.
This commit is contained in:
Rasmus 2015-03-27 12:51:01 +01:00
parent 22f732c255
commit e9fd19968b
2 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ox-latex.el
View File

@ -1240,7 +1240,7 @@ INFO is a plist used as a communication channel."
(or (plist-get info :description) "") objects) (or (plist-get info :description) "") objects)
info) info)
info)) info))
(?c . ,(if (plist-get info :with-creator) (plist-get info :creator) "")) (?c . ,(plist-get info :creator))
(?l . ,language) (?l . ,language)
(?L . ,(capitalize language)) (?L . ,(capitalize language))
(?D . ,(org-export-get-date info))))) (?D . ,(org-export-get-date info)))))

4
lisp/ox-odt.el
View File

@ -1359,9 +1359,7 @@ original parsed data. INFO is a plist holding export options."
(format "<meta:creation-date>%s</meta:creation-date>\n" (format "<meta:creation-date>%s</meta:creation-date>\n"
iso-date))))) iso-date)))))
(format "<meta:generator>%s</meta:generator>\n" (format "<meta:generator>%s</meta:generator>\n"
(if (plist-get info :with-creator) (plist-get info :creator))
(plist-get info :creator)
""))
(format "<meta:keyword>%s</meta:keyword>\n" keywords) (format "<meta:keyword>%s</meta:keyword>\n" keywords)
(format "<dc:subject>%s</dc:subject>\n" description) (format "<dc:subject>%s</dc:subject>\n" description)
(format "<dc:title>%s</dc:title>\n" title) (format "<dc:title>%s</dc:title>\n" title)