aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1996-04-23 15:30:28 +0000
committerRichard M. Stallman1996-04-23 15:30:28 +0000
commitda3bf069f08f5e7e4af1d97ffe5d93bc36caf8ea (patch)
tree3294e552436bb2083c3ed29273ab9b04e407a33d
parentdd10ec4fd13cc11c5188fd76a3852e0eea294ee8 (diff)
downloademacs-da3bf069f08f5e7e4af1d97ffe5d93bc36caf8ea.tar.gz
emacs-da3bf069f08f5e7e4af1d97ffe5d93bc36caf8ea.zip
(doctor-doc): Add period.
-rw-r--r--lisp/play/doctor.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/play/doctor.el b/lisp/play/doctor.el
index 3c8f8eadb47..ff03de852ff 100644
--- a/lisp/play/doctor.el
+++ b/lisp/play/doctor.el
@@ -885,7 +885,7 @@ Otherwise call the Doctor to parse preceding sentence."
885(defun doctor-doc (sent) 885(defun doctor-doc (sent)
886 (cond 886 (cond
887 ((equal sent '(foo)) 887 ((equal sent '(foo))
888 (doctor-type '(bar! ($ please)($ continue)))) 888 (doctor-type '(bar! ($ please)($ continue) \.)))
889 ((member sent howareyoulst) 889 ((member sent howareyoulst)
890 (doctor-type '(i\'m ok \. ($ describe) yourself \.))) 890 (doctor-type '(i\'m ok \. ($ describe) yourself \.)))
891 ((or (member sent '((good bye) (see you later) (i quit) (so long) 891 ((or (member sent '((good bye) (see you later) (i quit) (so long)