Don't quote lambda expressions with `quote'.

[gnu-emacs] / lisp / thumbs.el

diff --git a/lisp/thumbs.el b/lisp/thumbs.el
index b251ca60246c664aa730d63812250e226a9f2b6a..7a5057584083eb50541304c22213f308fc2a5168 100644 (file)
--- a/lisp/thumbs.el
+++ b/lisp/thumbs.el
@@ -226,7 +226,7 @@ reached."
              (let ((fattribs-list (file-attributes f)))
                `(,(nth 4 fattribs-list) ,(nth 7 fattribs-list) ,f)))
            (directory-files (thumbs-thumbsdir) t (image-file-name-regexp)))
-          '(lambda (l1 l2) (time-less-p (car l1) (car l2)))))
+          (lambda (l1 l2) (time-less-p (car l1) (car l2)))))
         (dirsize (apply '+ (mapcar (lambda (x) (cadr x)) files-list))))
     (while (> dirsize thumbs-thumbsdir-max-size)
       (progn