helpful

commit d54422a47cc9a33c37db9c030c0f3ca35a797627
parent 022098d6c5fbd975ec4c5102327ea04d5840d711
Author: Wilfred Hughes <me@wilfred.me.uk>
Date:   Sat,  7 Jul 2018 20:53:54 +0100

Detect more forms of function calls

Diffstat:
M
helpful.el
 | 
7
++++---

1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/helpful.el b/helpful.el
@@ -1615,10 +1615,11 @@ may contain duplicates."
        protected-form-fns
        (-flatten handler-fns))))
 
-   ;; Calling a function with `funcall' or `apply', for example
-   ;; (funcall 'foo 1 2).
+   ;; Calling a function with a well known higher order function, for
+   ;; example (funcall 'foo 1 2).
    ((and
-     (memq (car form) '(funcall apply))
+     (memq (car form) '(funcall apply call-interactively
+                                mapcar mapc -map))
      (eq (car-safe (nth 1 form)) 'quote))
     (cons
      (cadr (nth 1 form))