(catch 'done
(let ((url (bibtex-autokey-get-field "url")))
(when url
- (browse-url url)
+ (browse-url (s-trim url))
(throw 'done nil)))
(let ((doi (bibtex-autokey-get-field "doi")))
(when doi
(if (string-match "^http" doi)
(browse-url doi)
- (browse-url (format "http://dx.doi.org/%s" doi)))
+ (browse-url (format "http://dx.doi.org/%s" (s-trim doi))))
(throw 'done nil))))))))
(email-bibtex-entry)) nil)))
#+END_SRC
-#+RESULTS:
-: org-ref-cite-hydra/body
-
-cite:oberhofer-2013-first
* End of code
#+BEGIN_SRC emacs-lisp :tangle org-ref.el
(provide 'org-ref)