# HG changeset patch # User Richard M. Stallman # Date 843084030 0 # Node ID b5b7d7552f3443f097b3f7dc82d0a67064a599c8 # Parent 5dce4ca06a77922e29b9ef2cc449f54d380b11ce (tq-filter): No need for save-match-data. diff -r 5dce4ca06a77 -r b5b7d7552f34 lisp/emacs-lisp/tq.el --- a/lisp/emacs-lisp/tq.el Tue Sep 17 21:38:17 1996 +0000 +++ b/lisp/emacs-lisp/tq.el Wed Sep 18 22:00:30 1996 +0000 @@ -89,7 +89,7 @@ "Append STRING to the TQ's buffer; then process the new data." (let ((old-buffer (current-buffer))) (unwind-protect - (save-match-data + (progn (set-buffer (tq-buffer tq)) (goto-char (point-max)) (insert string)