[Top][All Lists]

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

[elpa] scratch/org-contacts-rebased 6c12101 010/118: org-contacts: Use `

From: Stefan Monnier
Subject: [elpa] scratch/org-contacts-rebased 6c12101 010/118: org-contacts: Use `with-current-buffer' instead of `save-excursion'+`with-current-buffer'.
Date: Fri, 12 Nov 2021 15:36:54 -0500 (EST)

branch: scratch/org-contacts-rebased
commit 6c12101c8c01cf69067a0f0c78edd45b36ed753b
Author: Michael Markert <markert.michael@googlemail.com>
Commit: Julien Danjou <julien@danjou.info>

    org-contacts: Use `with-current-buffer' instead of 
    Signed-off-by: Michael Markert <markert.michael@googlemail.com>
    Signed-off-by: Julien Danjou <julien@danjou.info>
 org-contacts.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/org-contacts.el b/org-contacts.el
index 63ba005..9b08d67 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -418,8 +418,7 @@ This adds `org-contacts-gnus-check-mail-address' and
   "Retrieve the content of the `From' header of an email.
 Works from wl-summary-mode and mime-view-mode - that is while viewing email.
 Depends on Wanderlust been loaded."
-  (save-excursion
-    (set-buffer (org-capture-get :original-buffer))
+  (with-current-buffer (org-capture-get :original-buffer)
      ((eq major-mode 'wl-summary-mode) (when wl-summary-buffer-elmo-folder

reply via email to

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