diff options
| author | Karl Heuer | 1997-11-11 04:00:53 +0000 |
|---|---|---|
| committer | Karl Heuer | 1997-11-11 04:00:53 +0000 |
| commit | 915c0e25150b8b823afeefea3d5b1647659f27db (patch) | |
| tree | c196cbc127a4f2fad8f27e73c049268f003c895f | |
| parent | ed13681ff17ef0a1f6e2e69449c19d1dbf2bdff6 (diff) | |
| download | emacs-915c0e25150b8b823afeefea3d5b1647659f27db.tar.gz emacs-915c0e25150b8b823afeefea3d5b1647659f27db.zip | |
(inferior-octave-startup-args):
Set to '("-i") to force interactive behavior.
(inferior-octave-prompt): Include the `debug' prompt issued by the
Octave `keyboard' command.
| -rw-r--r-- | lisp/progmodes/octave-inf.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/octave-inf.el b/lisp/progmodes/octave-inf.el index cbe4ffcc89d..5be9e94cc46 100644 --- a/lisp/progmodes/octave-inf.el +++ b/lisp/progmodes/octave-inf.el | |||
| @@ -32,7 +32,8 @@ | |||
| 32 | (defvar inferior-octave-program "octave" | 32 | (defvar inferior-octave-program "octave" |
| 33 | "*Program invoked by `inferior-octave'.") | 33 | "*Program invoked by `inferior-octave'.") |
| 34 | 34 | ||
| 35 | (defvar inferior-octave-prompt "\\(^octave\\(:[0-9]+\\)?\\|^\\)>+ " | 35 | (defvar inferior-octave-prompt |
| 36 | "\\(^octave\\(:[0-9]+\\)?\\|^debug\\|^\\)>+ " | ||
| 36 | "*Regexp to match prompts for the inferior Octave process.") | 37 | "*Regexp to match prompts for the inferior Octave process.") |
| 37 | 38 | ||
| 38 | (defvar inferior-octave-startup-file nil | 39 | (defvar inferior-octave-startup-file nil |
| @@ -40,7 +41,7 @@ | |||
| 40 | The contents of this file are sent to the inferior Octave process on | 41 | The contents of this file are sent to the inferior Octave process on |
| 41 | startup.") | 42 | startup.") |
| 42 | 43 | ||
| 43 | (defvar inferior-octave-startup-args nil | 44 | (defvar inferior-octave-startup-args '("-i") |
| 44 | "*List of command line arguments for the inferior Octave process. | 45 | "*List of command line arguments for the inferior Octave process. |
| 45 | For example, for suppressing the startup message and using `traditional' | 46 | For example, for suppressing the startup message and using `traditional' |
| 46 | mode, set this to (\"-q\" \"--traditional\").") | 47 | mode, set this to (\"-q\" \"--traditional\").") |