aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/lisp/my
diff options
context:
space:
mode:
authorYuchen Pei <id@ypei.org>2023-09-30 17:22:56 +1000
committerYuchen Pei <id@ypei.org>2023-09-30 17:22:56 +1000
commitc2c8dc13c8d052cac552d3db69654e86794a733a (patch)
tree2ffbc83b0a9083227350df33ba083eea4450b5d4 /emacs/.emacs.d/lisp/my
parent41739f32b8bfb5c35fe6a7f2961eda3596fd5e51 (diff)
[emacs] fixing scihub functions prefix
Diffstat (limited to 'emacs/.emacs.d/lisp/my')
-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