changeset 42070:e904fde74072

(mapthread): Make a closure.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 16 Dec 2001 05:32:59 +0000
parents 45753958166e
children 1ecb0abf1d15
files lisp/language/ind-util.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/ind-util.el	Sun Dec 16 05:16:40 2001 +0000
+++ b/lisp/language/ind-util.el	Sun Dec 16 05:32:59 2001 +0000
@@ -200,7 +200,7 @@
        (lambda (x)
          (apply 
           'mapthread 
-          (lambda (&rest y) (apply function x y))
+          `(lambda (&rest y) (apply ',function x y))
           seqrest))
        seq1)
   (mapcar function seq1)))