From: Bastien Guerry <bastien1@free.fr>
Date: Wed, 16 Feb 2011 16:55:21 +0000 (+0100)
Subject: play/doctor.el: bugfix for `doctor-mode'.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~859
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=689743a20ba5883750ab24192ec955941f2b9752;p=emacs.git

play/doctor.el: bugfix for `doctor-mode'.

* play/doctor.el (doctor-mode): Bugfix: escape the "," character
in a `doctor-type' argument.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5d346845e58..ce58c47ad12 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-02-16  Bastien Guerry  <bzg@altern.org>
+
+	* play/doctor.el (doctor-mode): Bugfix: escape the "," character
+	in a `doctor-type' argument.
+
 2011-02-16  Alex Harsanyi  <AlexHarsanyi@gmail.com>
 
 	* net/soap-client.el:
diff --git a/lisp/play/doctor.el b/lisp/play/doctor.el
index 5b3b4aba0fe..c60472e9386 100644
--- a/lisp/play/doctor.el
+++ b/lisp/play/doctor.el
@@ -141,7 +141,7 @@ reads the sentence before point, and prints the Doctor's answer."
   (turn-on-auto-fill)
   (doctor-type '(i am the psychotherapist \.
 		 (doc$ doctor--please) (doc$ doctor--describe) your (doc$ doctor--problems) \.
-		 each time you are finished talking, type \R\E\T twice \.))
+		 each time you are finished talking\, type \R\E\T twice \.))
   (insert "\n"))
 
 (defun make-doctor-variables ()