X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=doi-utils.el;h=385785af1e52d1c2092ff3e76abb007c6a55eb18;hp=74c0045c7e94ee4eb240dde49c27551dc56c666b;hb=ca0d4bbfa864ceb371eef35f36987f8f9a7b7679;hpb=af95692eb428ef0b23506dacefa6615c85456650

diff --git a/doi-utils.el b/doi-utils.el
index 74c0045..385785a 100644
--- a/doi-utils.el
+++ b/doi-utils.el
@@ -1,9 +1,11 @@
-;;; doi-utils.el --- DOI utilities for making bibtex entries and downloading PDFs  -*- lexical-binding: t; -*-
+;;; doi-utils.el --- DOI utilities for making bibtex entries
 
 ;; Copyright (C) 2015  John Kitchin
 
 ;; Author: John Kitchin <jkitchin@andrew.cmu.edu>
 ;; Keywords: convenience
+;; Version: 0.1
+;; Package-Requires: ((org-ref))
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
@@ -30,8 +32,6 @@
 ;; - doi-utils-add-bibtex-entry-from-region to add an entry from a highlighed doi to your default bibliography.
 ;; - doi-utils-update-bibtex-entry-from-doi with cursor in an entry to update its fields.
 
-;; Package-Requires: ((org-ref))
-
 (require 'json)
 
 ;;; Code:
@@ -116,14 +116,15 @@
 
 
 (defun doi-utils-get-wiley-pdf-url (redirect-url)
-  "wileyscience direct hides the pdf url in html. we get it out here"
+  "Wileyscience direct hides the pdf url in html.
+We get it out here by parsing the html."
   (setq *doi-utils-waiting* t)
   (url-retrieve redirect-url
 		(lambda (status)
-		  (beginning-of-buffer)
+		  (goto-char (point-min))
 		  (re-search-forward "<iframe id=\"pdfDocument\" src=\"\\([^\"]*\\)\"" nil)
 		  (setq *doi-utils-pdf-url* (match-string 1)
-			,*doi-utils-waiting* nil)))
+			*doi-utils-waiting* nil)))
   (while *doi-utils-waiting* (sleep-for 0.1))
   *doi-utils-pdf-url*)