diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/language/ind-util.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bb26b76edc..2f1e33f4b2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-12-16 Stefan Monnier <[email protected]> + + * language/ind-util.el (mapthread): Make a closure. + 2001-12-15 Richard M. Stallman <[email protected]> * isearch.el (isearch-start-hscroll): New variable. diff --git a/lisp/language/ind-util.el b/lisp/language/ind-util.el index de1ca127f5..bc72638c11 100644 --- a/lisp/language/ind-util.el +++ b/lisp/language/ind-util.el @@ -200,7 +200,7 @@ FUNCTION will be called 15 times." (lambda (x) (apply 'mapthread - (lambda (&rest y) (apply function x y)) + `(lambda (&rest y) (apply ',function x y)) seqrest)) seq1) (mapcar function seq1))) |