Explorar o código

Update vm link definition

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

Update to use org-link-set-parameters.
Robert Klein %!s(int64=8) %!d(string=hai) anos
pai
achega
02a51cfed3
Modificáronse 1 ficheiros con 2 adicións e 3 borrados
  1. 2 3
      contrib/lisp/org-vm.el

+ 2 - 3
contrib/lisp/org-vm.el

@@ -55,9 +55,8 @@
 (defvar vm-folder-directory)
 
 ;; Install the link type
-(org-add-link-type "vm" 'org-vm-open)
-(org-add-link-type "vm-imap" 'org-vm-imap-open)
-(add-hook 'org-store-link-functions 'org-vm-store-link)
+(org-link-set-parameters "vm" :follow #'org-vm-open :store #'org-vm-store-link)
+(org-link-set-parameters "vm-imap" :follow #'org-vm-imap-open)
 
 ;; Implementation
 (defun org-vm-store-link ()