(inferior-octave-prompt): Recognize version number in prompt.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3e077f0c3fd04335015cb440a9646c62ed8d0814..dde7d5366ccee6776b50212ec48ea11c110beeb5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-10-29  Lute Kamstra  <lute@gnu.org>
+
+       * progmodes/octave-inf.el (inferior-octave-prompt): Recognize
+       version number in prompt.
+

 2003-10-28  Dave Love  <fx@gnu.org>
 
        * international/characters.el: Fix some Unicode ranges.
 2003-10-28  Dave Love  <fx@gnu.org>
 
        * international/characters.el: Fix some Unicode ranges.

diff --git a/lisp/progmodes/octave-inf.el b/lisp/progmodes/octave-inf.el
index c09f99a45477d764014d53cdda98526316da3f3e..265cf6c049b14389bfe30445667aaae08bf1be8e 100644 (file)
--- a/lisp/progmodes/octave-inf.el
+++ b/lisp/progmodes/octave-inf.el
@@ -41,7 +41,7 @@
   :group 'octave-inferior)
 
 (defcustom inferior-octave-prompt
   :group 'octave-inferior)
 
 (defcustom inferior-octave-prompt

-  "\\(^octave\\(\\|.bin\\)\\(:[0-9]+\\)?\\|^debug\\|^\\)>+ "
+  "\\(^octave\\(\\|.bin\\)\\(-[.0-9]+\\)?\\(:[0-9]+\\)?\\|^debug\\|^\\)>+ "

   "*Regexp to match prompts for the inferior Octave process."
   :type 'regexp
   :group 'octave-inferior)
   "*Regexp to match prompts for the inferior Octave process."
   :type 'regexp
   :group 'octave-inferior)