# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 820797443 0
# Node ID 71284f0d43acfda6b38b1db86ef9e230a4495816
# Parent  1d991598b3b721f0b22f1a1479787a415177aa2e
(make-doctor-variables, doctor-othermodifierp,
doctor-strangelove): Fix message spelling.

diff -r 1d991598b3b7 -r 71284f0d43ac lisp/play/doctor.el
--- a/lisp/play/doctor.el	Thu Jan 04 23:16:33 1996 +0000
+++ b/lisp/play/doctor.el	Thu Jan 04 23:17:23 1996 +0000
@@ -223,7 +223,7 @@
   (make-local-variable 'feelings-about)
   (setq feelings-about
 	'((feelings about)
-	  (aprehensions toward)
+	  (apprehensions toward)
 	  (thoughts on)
 	  (emotions toward)))
   (make-local-variable 'random-adjective)
@@ -1217,7 +1217,7 @@
   (memq x '(all also always amusing any anyway associated awesome
 		bad beautiful best better but certain clear
 		ever every fantastic fun funny
-		good great gross growdy however if ignorant
+		good great grody gross however if ignorant
 		less linked losing lusing many more much
 		never nice obnoxious often poor pretty real related rich
 		similar some stupid super superb
@@ -1620,7 +1620,7 @@
 
 (defun doctor-strangelove ()
   (interactive)
-  (insert "Mein fuhrer!!\n")
+  (insert "Mein fuehrer!!\n")
   (doctor-read-print))
 
 ;;; doctor.el ends here