*** empty log message ***

1 files changed, 6 insertions, 3 deletions

diff --git a/lisp/emacs-lisp/tq.el b/lisp/emacs-lisp/tq.el
index e9d3a80af54..4a5b155a55e 100644
--- a/lisp/emacs-lisp/tq.el
+++ b/lisp/emacs-lisp/tq.el
@@ -1,18 +1,21 @@
 ;;; tq.el --- utility to maintain a transaction queue
 
-;;; Copyright (C) 1992 Scott Draves (spot@cs.cmu.edu)
-;;; 
+;; Author: Scott Draves <spot@cs.cmu.edu>
+;; Adapted-By: ESR
+
+;; Commentary:
+ 
 ;;; manages receiving a stream asynchronously, 
 ;;; parsing it into transactions, and then calling
 ;;; handler functions
 
-
 ;;; Our basic structure is the queue/process/buffer triple.  Each entry
 ;;; of the queue is a regexp/closure/function triple.  We buffer
 ;;; bytes from the process until we see the regexp at the head of the
 ;;; queue.  Then we call the function with the closure and the
 ;;; collected bytes.
 
+;;; Code:
 
 (provide 'tq)