From da3bf069f08f5e7e4af1d97ffe5d93bc36caf8ea Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 23 Apr 1996 15:30:28 +0000 Subject: (doctor-doc): Add period. --- lisp/play/doctor.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/play') diff --git a/lisp/play/doctor.el b/lisp/play/doctor.el index 3c8f8eadb4..ff03de852f 100644 --- a/lisp/play/doctor.el +++ b/lisp/play/doctor.el @@ -885,7 +885,7 @@ Otherwise call the Doctor to parse preceding sentence." (defun doctor-doc (sent) (cond ((equal sent '(foo)) - (doctor-type '(bar! ($ please)($ continue)))) + (doctor-type '(bar! ($ please)($ continue) \.))) ((member sent howareyoulst) (doctor-type '(i\'m ok \. ($ describe) yourself \.))) ((or (member sent '((good bye) (see you later) (i quit) (so long) -- cgit v1.2.3