# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 741819741 0
# Node ID fc25d1816641a4ae564f34784653f9780c0e0a35
# Parent  67e1b1075322555713d3d7913573b504aad0379a
	* comint.el (comint-prompt-regexp): Double the backslashes in the
	sample prompt regexps, so that they print properly when unquoted.

diff -r 67e1b1075322 -r fc25d1816641 lisp/comint.el
--- a/lisp/comint.el	Sun Jul 04 20:03:20 1993 +0000
+++ b/lisp/comint.el	Sun Jul 04 21:02:21 1993 +0000
@@ -128,8 +128,8 @@
 
 Good choices:
   Canonical Lisp: \"^[^> ]*>+:? *\" (Lucid, franz, kcl, T, cscheme, oaklisp)
-  Lucid Common Lisp: \"^\\(>\\|\\(->\\)+\\) *\"
-  franz: \"^\\(->\\|<[0-9]*>:\\) *\"
+  Lucid Common Lisp: \"^\\\\(>\\\\|\\\\(->\\\\)+\\\\) *\"
+  franz: \"^\\\\(->\\\\|<[0-9]*>:\\\\) *\"
   kcl: \"^>+ *\"
   shell: \"^[^#$%>]*[#$%>] *\"
   T: \"^>+ *\"