* lisp/emacs-lisp/tq.el (tq-create): Use a closure instead of `(lambda...).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bf8dad1b6212036a0aac5bb85059cc3dfb4cd3b8..157152b20a3497c1310eb755c5933e2cb9b2320a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-10-07  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * emacs-lisp/tq.el (tq-create): Use a closure instead of `(lambda...).
+
        * progmodes/ruby-mode.el: Fix recently added tests.
        (ruby-smie-grammar): Add - and +.
        (ruby-smie--redundant-do-p, ruby-smie--forward-id)

diff --git a/lisp/emacs-lisp/tq.el b/lisp/emacs-lisp/tq.el
index d308ce694d20f51772b4f89fc1821959a291c772..e608dd3eedcb3365765ef53b75129f6f5577e369 100644 (file)
--- a/lisp/emacs-lisp/tq.el
+++ b/lisp/emacs-lisp/tq.el
@@ -1,4 +1,4 @@
-;;; tq.el --- utility to maintain a transaction queue
+;;; tq.el --- utility to maintain a transaction queue  -*- lexical-binding:t -*-
 
 ;; Copyright (C) 1985-1987, 1992, 2001-2013 Free Software Foundation,
 ;; Inc.
@@ -87,8 +87,7 @@ to a tcp server on another machine."
                                     (process-name process)))))))
     (buffer-disable-undo (tq-buffer tq))
     (set-process-filter process
-                       `(lambda (proc string)
-                          (tq-filter ',tq string)))
+                       (lambda (_proc string) (tq-filter tq string)))
     tq))
 
 (defun tq-queue-add (tq question re closure fn)