Merge branch 'add_copy'

[org-ref.git] / jmax-bibtex.el

diff --git a/jmax-bibtex.el b/jmax-bibtex.el
index 60022757f07ec497ffb40404966450b8d1251b59..e560e540c609191d1efc0bbff04a1246e9027b97 100644 (file)
--- a/jmax-bibtex.el
+++ b/jmax-bibtex.el
@@ -183,6 +183,7 @@ This is defined in `jmax-bibtex-journal-abbreviations'."
        ("ú" .  "{\\\\'u}")
        ("ú" . "{\\\\'u}")
        ("š" . "{\\\\v{s}}")
+       ("ř"  . "{\\\\v{r}}")
        ("İ" . "{\\\\.I}")
        ("ğ" . "{\\\\u{g}}")
        ("δ" . "$\\\\delta$")
@@ -259,7 +260,7 @@ all the title entries in articles."
        (setf (car words) (s-capitalize (car words))))
 
       (setq title (mapconcat 'identity words " "))
-      
+
       ;; Capitalize letters after a dash
       (while
          (string-match "[a-zA-Z]-\\([a-z]\\)" title start)
@@ -267,7 +268,7 @@ all the title entries in articles."
          (setf (substring title (match-beginning 1) (match-end 1))
                (format "%s" (upcase char)))
          (setq start (match-end 1))))
-           
+
       ;; this is defined in doi-utils
       (bibtex-set-field
        "title"
@@ -299,7 +300,7 @@ all the title entries in articles."
                         word
                       (s-downcase word)))
                   words))
-      
+
       ;; capitalize first word
       (setf (car words) (s-capitalize (car words)))
 
@@ -314,7 +315,7 @@ all the title entries in articles."
 ;;             (format "{%s}" (upcase char)))
                (format "%s" (upcase char)))
          (setq start (match-end 1))))
-           
+
       ;; this is defined in doi-utils
       (bibtex-set-field
        "title" title)
@@ -415,11 +416,11 @@ N is a prefix argument.  If it is numeric, jump that many entries back."
   "thin wrapper to get `jmax-bibtex' to open pdf"
   (interactive)
   (org-ref-open-bibtex-pdf))
-  
+
 
 
 (defvar jmax-bibtex-menu-funcs '()
- "Functions to run in doi menu. Each entry is a list of (key menu-name function). 
+ "Functions to run in doi menu. Each entry is a list of (key menu-name function).
 The function must take one argument, the doi.")
 
 (setq jmax-bibtex-menu-funcs
@@ -435,7 +436,7 @@ The function must take one argument, the doi.")
   "Menu command to run in a bibtex entry.
 Functions from `jmax-bibtex-menu-funcs'. They all rely on the
 entry having a doi."
-  
+
   (interactive)
   ;; construct menu string as a message
   (message
@@ -450,7 +451,7 @@ entry having a doi."
                  (char-to-string input) jmax-bibtex-menu-funcs)))
     (when choice
       (funcall
-       (elt 
+       (elt
        choice
        2)
        (jmax-bibtex-entry-doi)