(tq-create): Fix mixed up unquote style.

2b652064 · Stefan Monnier · da92b8d9 · 2b652064
Commit 2b652064 authored Sep 12, 2003 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/emacs-lisp/tq.el lisp/emacs-lisp/tq.el +2 -2

No files found.
--- a/lisp/emacs-lisp/tq.el
+++ b/lisp/emacs-lisp/tq.el
 ;;; tq.el --- utility to maintain a transaction queue

-;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1986, 1987, 1992, 2003 Free Software Foundation, Inc.

 ;; Author: Scott Draves <spot@cs.cmu.edu>
 ;; Maintainer: FSF
@@ -50,7 +50,7 @@ to a tcp server on another machine."
 				     (process-name process)))))))
    (set-process-filter process
 			`(lambda (proc string)
-			   (tq-filter '(, tq) string)))
+			   (tq-filter ',tq string)))
    tq))

 ;;; accessors