[Emacs-diffs] master 64a1444 2/2: Probably fix the `helper' argument in feedmail.el

[Lars Ingebrigtsen]

branch: master
commit 64a14444b5f190819e51e0d260c28a2338574805
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Probably fix the `helper' argument in feedmail.el
    
    * lisp/mail/feedmail.el (feedmail-queue-send-edit-prompt-inner):
    Return the helper function (instead of the symbol `helper') so
    that the caller can actually call it.
---
 lisp/mail/feedmail.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el
index 943bdd8..babc3fc 100644
--- a/lisp/mail/feedmail.el
+++ b/lisp/mail/feedmail.el
@@ -2168,9 +2168,7 @@ you can set `feedmail-queue-reminder-alist' to nil."
               (let ((inhibit-quit t) (cursor-in-echo-area t) (echo-keystrokes 
0))
                 (read-char-exclusive))))
          (if (= user-sez help-char)
-              ;; FIXME: This seems to want to refer to the `helper' argument,
-              ;; but it's quoted so the `helper' arg ends up unused!
-             (setq answer '(^ . helper))
+             (setq answer (cons '^ helper))
            (if (or (eq user-sez ?\C-m) (eq user-sez ?\C-j) (eq user-sez ?y))
                (setq user-sez d-char))
            ;; these char-to-int things are because of some