# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 841530286 0
# Node ID def38ab5315cab220c61b25386d50fdbe34ffae1
# Parent  2cc9369185ed3faa14cde2f38b404f8cf3200297
(make-doctor-variables): Eliminate `observation-list' also.

diff -r 2cc9369185ed -r def38ab5315c lisp/play/doctor.el
--- a/lisp/play/doctor.el	Sat Aug 31 22:21:53 1996 +0000
+++ b/lisp/play/doctor.el	Sat Aug 31 22:24:46 1996 +0000
@@ -529,8 +529,6 @@
   (setq obj nil)
   (make-local-variable 'feared)
   (setq feared nil)
-  (make-local-variable 'observation-list)
-  (setq observation-list nil)
   (make-local-variable 'repetitive-shortness)
   (setq repetitive-shortness '(0 . 0))
   (make-local-variable '**mad**)
@@ -1466,7 +1464,6 @@
 	       (t
 		(doctor-type '(i give up \. you need a lesson in creative
 				 writing \.\.\.))
-		;;(push monosyllables observation-list)
 		)))
 	(t
 	 (cond ((equal sent (doctor-assm '(yes)))