# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 879220853 0
# Node ID 0457d32c5b05a1534f9cb9eedd3c89fdcd37b9ff
# Parent  e29142cee7c3ee70263ff3126ebb2458d47cb907
(inferior-octave-startup-args):
Set to '("-i") to force interactive behavior.
(inferior-octave-prompt): Include the `debug' prompt issued by the
Octave `keyboard' command.

diff -r e29142cee7c3 -r 0457d32c5b05 lisp/progmodes/octave-inf.el
--- a/lisp/progmodes/octave-inf.el	Tue Nov 11 03:55:47 1997 +0000
+++ b/lisp/progmodes/octave-inf.el	Tue Nov 11 04:00:53 1997 +0000
@@ -32,7 +32,8 @@
 (defvar inferior-octave-program "octave"
   "*Program invoked by `inferior-octave'.")
 
-(defvar inferior-octave-prompt "\\(^octave\\(:[0-9]+\\)?\\|^\\)>+ "
+(defvar inferior-octave-prompt
+  "\\(^octave\\(:[0-9]+\\)?\\|^debug\\|^\\)>+ "
   "*Regexp to match prompts for the inferior Octave process.")
 
 (defvar inferior-octave-startup-file nil
@@ -40,7 +41,7 @@
 The contents of this file are sent to the inferior Octave process on
 startup.")
 
-(defvar inferior-octave-startup-args nil
+(defvar inferior-octave-startup-args '("-i")
   "*List of command line arguments for the inferior Octave process.
 For example, for suppressing the startup message and using `traditional'
 mode, set this to (\"-q\" \"--traditional\").")