X-Git-Url: https://git.donarmstrong.com/?p=org-ref.git;a=blobdiff_plain;f=arxiv.el;h=4ca96afa9f6e24964776a0c49a43215d74cdba69;hp=783719535f48a44cc58da1b8a0a6735b6a4f268b;hb=107f7d826250fa9a511bebb5ac4c14ace7c5dc90;hpb=7962d01339735d7a28d75c4f34afc1f4819575d7 diff --git a/arxiv.el b/arxiv.el index 7837195..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,13 +107,13 @@ (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)))