[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/org-contrib 1ee7db2701: * lisp/ol-vm.el (org-vm-store-link
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/org-contrib 1ee7db2701: * lisp/ol-vm.el (org-vm-store-link): Do not use obsolete function names |
Date: |
Fri, 15 Sep 2023 07:00:27 -0400 (EDT) |
branch: elpa/org-contrib
commit 1ee7db27015e72202928925305dde9e5a2ee6a01
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
* lisp/ol-vm.el (org-vm-store-link): Do not use obsolete function names
---
lisp/ol-vm.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/ol-vm.el b/lisp/ol-vm.el
index bfd4a0b4ea..b42843d679 100644
--- a/lisp/ol-vm.el
+++ b/lisp/ol-vm.el
@@ -88,11 +88,11 @@
folder))
(setq folder (replace-match "" t t folder)))))
(setq message-id (org-unbracket-string "<" ">" message-id))
- (org-store-link-props :type link-type :from from :to to :subject subject
+ (org-link-store-props :type link-type :from from :to to :subject subject
:message-id message-id :date date)
- (setq desc (org-email-link-description))
+ (setq desc (org-link-email-description))
(setq link (concat (concat link-type ":") folder "#" message-id))
- (org-add-link-props :link link :description desc)
+ (org-link-add-props :link link :description desc)
link))))
(defun org-vm-open (path _)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/org-contrib 1ee7db2701: * lisp/ol-vm.el (org-vm-store-link): Do not use obsolete function names,
ELPA Syncer <=