瀏覽代碼

Update elisp-symbol link definition

* contrib/lisp/org-elisp-symbol.el ("elisp-symbol"):

Update to use org-link-set-parameters.
Robert Klein 8 年之前
父節點
當前提交
c74e89e40b
共有 1 個文件被更改,包括 3 次插入2 次删除
  1. 3 2
      contrib/lisp/org-elisp-symbol.el

+ 3 - 2
contrib/lisp/org-elisp-symbol.el

@@ -78,8 +78,9 @@
 
 (require 'org)
 
-(org-add-link-type "elisp-symbol" 'org-elisp-symbol-open)
-(add-hook 'org-store-link-functions 'org-elisp-symbol-store-link)
+(org-link-set-parameters "elisp-symbol"
+			 :follow #'org-elisp-symbol-open
+			 :store #'org-elisp-symbol-store-link)
 
 (defun org-elisp-symbol-open (path)
   "Visit the emacs-lisp elisp-symbol at PATH."