Browse Source

ox.el (org-export-dictionary): Add "References"

* ox.el (org-export-dictionary): Add "References".

* contrib/lisp/ox-bibtex.el (org-bibtex-process-bib-files):
Translate "References" according to the export language.

Thanks to Julian Gehring for suggesting this.
Bastien Guerry 7 years ago
parent
commit
860912c6d0
2 changed files with 7 additions and 2 deletions
  1. 5 2
      contrib/lisp/ox-bibtex.el
  2. 2 0
      lisp/ox.el

+ 5 - 2
contrib/lisp/ox-bibtex.el

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

+ 2 - 0
lisp/ox.el

@@ -5485,6 +5485,8 @@ them."
      ("ru" :html "&#1056;&#1072;&#1089;&#1087;&#1077;&#1095;&#1072;&#1090;&#1082;&#1072; %d.:"
       :utf-8 "Распечатка %d.:")
      ("zh-CN" :html "&#20195;&#30721;%d&nbsp;" :utf-8 "代码%d "))
+    ("References"
+     ("fr" :default "Références"))
     ("See section %s"
      ("da" :default "jævnfør afsnit %s")
      ("de" :default "siehe Abschnitt %s")