: doi-utils-get-pdf-url
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle no
(doi-utils-get-pdf-url "10.1126/science.1158722")
#+END_SRC
#+RESULTS:
: http://www.sciencemag.org/content/321/5890/792.full.pdf
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle no
(doi-utils-get-pdf-url "10.1021/nl500037x")
#+END_SRC
: http://pubs.acs.org/doi/pdf/10.1021/nl500037x
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle no
(doi-utils-get-pdf-url "10.1002/anie.201402680")
#+END_SRC
: doi-utils-get-json-metadata
For example:
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle no
(doi-utils-get-json-metadata "10.1103/PhysRevLett.99.016105")
#+END_SRC
results
author
title
+ booktitle
journal
year
volume
doi (plist-get results :DOI)
url (plist-get results :URL))
(cond
- ((string= type "journal-article")
+ ((or (string= type "journal-article") (string= type "article-journal"))
(doi-utils-expand-template "@article{,
author = {%{author}},
title = {%{title}},
doi = {%{doi}},
url = {%{url}},
}"))
+
+ ((string= type "proceedings-article")
+ (setq booktitle (plist-get results :container-title))
+ (doi-utils-expand-template "@inproceedings{,
+ author = {%{author}},
+ title = {%{title}},
+ booktitle = {%{booktitle}},
+ year = {%{year}},
+ month = {%{month}},
+ pages = {%{pages}},
+ doi = {%{doi}},
+ url = {%{url}},
+}"))
+
(t (message-box "%s not supported yet." type)))))
#+END_SRC
: doi-utils-doi-to-bibtex-string
To see that in action:
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle no
(doi-utils-doi-to-bibtex-string "10.1103/PhysRevLett.99.016105")
#+END_SRC
(provide 'doi-utils)
#+END_SRC
* load
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :tangle no
(org-babel-load-file "doi-utils.org")
#+END_SRC