Преглед на файлове

Update vm link definition

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

Update to use org-link-set-parameters.
Robert Klein преди 8 години
родител
ревизия
02a51cfed3
променени са 1 файла, в които са добавени 2 реда и са изтрити 3 реда
  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 ()