Merge branch 'master' of orgmode.org:org-mode

This commit is contained in:
Bastien Guerry 2014-04-17 18:13:50 +02:00
commit 1109d35d4f
2 changed files with 9 additions and 5 deletions

View File

@ -213,7 +213,7 @@ Return new parse tree."
(cond (cond
((org-export-derived-backend-p backend 'html) ((org-export-derived-backend-p backend 'html)
(insert (format "<div id=\"bibliography\">\n<h2>%s</h2>\n" (insert (format "<div id=\"bibliography\">\n<h2>%s</h2>\n"
(org-export-translates "References" :bibtex info))) (org-export-translate "References" :html info)))
(insert-file-contents (concat file ".html")) (insert-file-contents (concat file ".html"))
(insert "\n</div>")) (insert "\n</div>"))
((org-export-derived-backend-p backend 'ascii) ((org-export-derived-backend-p backend 'ascii)
@ -223,9 +223,13 @@ Return new parse tree."
"-o" "-o"
(concat file ".txt"))) (concat file ".txt")))
(error "Executing pandoc failed")) (error "Executing pandoc failed"))
(insert (format (insert
"%s\n==========\n\n" (format
(org-export-translates "References" :bibtex info))) "%s\n==========\n\n"
(org-export-translate
"References"
(intern (format ":%s" (plist-get info :ascii-charset)))
info)))
(insert-file-contents (concat file ".txt")) (insert-file-contents (concat file ".txt"))
(goto-char (point-min)) (goto-char (point-min))
(while (re-search-forward (while (re-search-forward

View File

@ -5486,7 +5486,7 @@ them."
:utf-8 "Распечатка %d.:") :utf-8 "Распечатка %d.:")
("zh-CN" :html "&#20195;&#30721;%d&nbsp;" :utf-8 "代码%d ")) ("zh-CN" :html "&#20195;&#30721;%d&nbsp;" :utf-8 "代码%d "))
("References" ("References"
("fr" :default "Références")) ("fr" :ascii "References" :default "Références"))
("See section %s" ("See section %s"
("da" :default "jævnfør afsnit %s") ("da" :default "jævnfør afsnit %s")
("de" :default "siehe Abschnitt %s") ("de" :default "siehe Abschnitt %s")