[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master fd71d62: * lisp/mail/hashcash.el (hashcash-insert-p
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] master fd71d62: * lisp/mail/hashcash.el (hashcash-insert-payment-async): Fix last change |
Date: |
Wed, 13 Mar 2019 14:25:34 -0400 (EDT) |
branch: master
commit fd71d626dc0554bcb770dc4b97b06edcf42516fb
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* lisp/mail/hashcash.el (hashcash-insert-payment-async): Fix last change
---
lisp/mail/hashcash.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/mail/hashcash.el b/lisp/mail/hashcash.el
index 519c6d9..6068952 100644
--- a/lisp/mail/hashcash.el
+++ b/lisp/mail/hashcash.el
@@ -243,8 +243,9 @@ Only start calculation. Results are inserted when ready."
(hashcash-generate-payment-async
(hashcash-payment-to arg)
(hashcash-payment-required arg)
- (lambda (process payment)
- (hashcash-insert-payment-async-2 (current-buffer) process payment)))))
+ (let ((buf (current-buffer)))
+ (lambda (process payment)
+ (hashcash-insert-payment-async-2 buf process payment))))))
(defun hashcash-insert-payment-async-2 (buffer process pay)
(when (buffer-live-p buffer)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master fd71d62: * lisp/mail/hashcash.el (hashcash-insert-payment-async): Fix last change,
Stefan Monnier <=