Use letf instead of cl-letf for XEmacs compat
authorLars Magne Ingebrigtsen <larsi@gnus.org>
Sat, 25 Apr 2015 12:46:20 +0000 (14:46 +0200)
committerLars Magne Ingebrigtsen <larsi@gnus.org>
Sat, 25 Apr 2015 12:46:20 +0000 (14:46 +0200)
* hashcash.el (hashcash-insert-payment-async-2): Save the mark when
altering the buffer.

lisp/hashcash.el

index dd677d4..9aaed5c 100644 (file)
@@ -252,7 +252,7 @@ Only start calculation.  Results are inserted when ready."
     (with-current-buffer buffer
       (save-excursion
        (save-restriction
-         (cl-letf (((mark)))
+         (letf (((mark)))
            (setq hashcash-process-alist (delq
                                          (assq process hashcash-process-alist)
                                          hashcash-process-alist))