From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 23 Dec 1993 04:43:53 +0000 (+0000)
Subject: (inferior-lisp-prompt): Don't match more than one line.
X-Git-Tag: emacs-19.34~10548
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=50e268ea77a083c1470efc23cdeee3c780951102;p=emacs.git

(inferior-lisp-prompt): Don't match more than one line.
---

diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index 2f5b608f864..a05b3dcd367 100644
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -149,9 +149,9 @@ produces cosmetically superior output for this application,
 but it works only in Common Lisp.")
 
 ;;;###autoload
-(defvar inferior-lisp-prompt "^[^> ]*>+:? *"
+(defvar inferior-lisp-prompt "^[^> \n]*>+:? *"
   "Regexp to recognise prompts in the Inferior Lisp mode.
-Defaults to \"^[^> ]*>+:? *\", which works pretty good for Lucid, kcl,
+Defaults to \"^[^> \\n]*>+:? *\", which works pretty good for Lucid, kcl,
 and franz.  This variable is used to initialize `comint-prompt-regexp' in the 
 Inferior Lisp buffer.