X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=arxiv.el;h=4ca96afa9f6e24964776a0c49a43215d74cdba69;hp=0fe6f0fcc7cb12a4466d60b0cc9f4893d9f2be4f;hb=HEAD;hpb=3f04f6d0d044bdbabb5ef520faed15a003eb6a30

diff --git a/arxiv.el b/arxiv.el
index 0fe6f0f..4ca96af 100644
--- a/arxiv.el
+++ b/arxiv.el
@@ -79,7 +79,7 @@
 (defun arxiv-add-bibtex-entry (arxiv-number bibfile)
   "Add bibtex entry for ARXIV-NUMBER to BIBFILE."
  (interactive
-   (list (read-input "arxiv: ")
+   (list (read-string "arxiv: ")
 	 ;;  now get the bibfile to add it to
 	 (ido-completing-read
 	  "Bibfile: "
@@ -107,17 +107,15 @@
     (url-copy-file pdf-url pdf)
     ;; now check if we got a pdf
     (with-temp-buffer
-      (insert-file-contents pdf-file)
+      (insert-file-contents pdf)
       ;; PDFS start with %PDF-1.x as the first few characters.
       (if (not (string= (buffer-substring 1 6) "%PDF-"))
 	  (progn
 	    (message "%s" (buffer-string))
-	    (delete-file pdf-file))
-	(message "%s saved" pdf-file)))
+	    (delete-file pdf))
+	(message "%s saved" pdf)))
 
     (org-open-file pdf)))
 
-(arxiv-get-pdf "0801.1144" "test.pdf")
-
 (provide 'arxiv)
 ;;; arxiv.el ends here