]> git.donarmstrong.com Git - org-ref.git/blobdiff - doi-utils.el
fix typo in wiley-pdf
[org-ref.git] / doi-utils.el
index abfa9436aabf9377ed1ded185775ab13920faab4..385785af1e52d1c2092ff3e76abb007c6a55eb18 100644 (file)
 
 
 (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*)