aboutsummaryrefslogtreecommitdiff
path: root/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'emacs')
-rw-r--r--emacs/.emacs.d/lisp/my/my-scihub.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-scihub.el b/emacs/.emacs.d/lisp/my/my-scihub.el
index 8d9f66b..689616c 100644
--- a/emacs/.emacs.d/lisp/my/my-scihub.el
+++ b/emacs/.emacs.d/lisp/my/my-scihub.el
@@ -30,7 +30,7 @@
(require 'link-gopher)
(defvar my-scihub-host nil "Scihub host")
-(defun my-get-scihub-pdf-link (doi)
+(defun my-scihub-get-pdf-link (doi)
(let ((link (car (link-gopher-get-all-links
(concat my-scihub-host doi) "\\.pdf$"))))
(when (not link)
@@ -39,15 +39,15 @@
(browse-url-firefox (concat my-scihub-host doi)))
link))
-(defun my-download-scihub-doi (doi)
+(defun my-scihub-download-doi (doi)
(interactive "sDOI: ")
- (when-let ((link (my-get-scihub-pdf-link doi))) (wget link)))
+ (when-let ((link (my-scihub-get-pdf-link doi))) (wget link)))
(defun my-org-attach-scihub ()
(interactive)
(require 'org-attach)
(when-let ((doi (org-entry-get (point) "DOI")))
- (org-attach-url (my-get-scihub-pdf-link doi))))
+ (org-attach-url (my-scihub-get-pdf-link doi))))
(provide 'my-scihub)
;;; my-scihub.el ends here