emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/org-contrib 59e1a9d6e4 2/2: * lisp/ol-mew.el (org-mew-stor


From: ELPA Syncer
Subject: [nongnu] elpa/org-contrib 59e1a9d6e4 2/2: * lisp/ol-mew.el (org-mew-store-link): Do not use obsolete function names
Date: Thu, 14 Sep 2023 10:00:51 -0400 (EDT)

branch: elpa/org-contrib
commit 59e1a9d6e4317179eb0fad58066c51259ba8bcf9
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    * lisp/ol-mew.el (org-mew-store-link): Do not use obsolete function names
---
 lisp/ol-mew.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/ol-mew.el b/lisp/ol-mew.el
index adc77235eb..633ec451ea 100644
--- a/lisp/ol-mew.el
+++ b/lisp/ol-mew.el
@@ -170,12 +170,12 @@ with \"t\" key."
               (date (mew-header-get-value "Date:"))
               (subject (mew-header-get-value "Subject:"))
               desc link)
-         (org-store-link-props :type "mew" :from from :to to :date date
+         (org-link-store-props :type "mew" :from from :to to :date date
                                :subject subject :message-id message-id)
          (setq message-id (org-unbracket-string "<" ">" message-id))
-         (setq desc (org-email-link-description))
+         (setq desc (org-link-email-description))
          (setq link (concat "mew:" folder-name "#" message-id))
-         (org-add-link-props :link link :description desc)
+         (org-link-add-props :link link :description desc)
          link)))))
 
 (defun org-mew-folder-name ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]