diff options
| -rw-r--r-- | lisp/progmodes/octave.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el index 3f7d1856658..8b472052f73 100644 --- a/lisp/progmodes/octave.el +++ b/lisp/progmodes/octave.el | |||
| @@ -1631,12 +1631,7 @@ code line." | |||
| 1631 | (paren-pos (cadr ppss)) | 1631 | (paren-pos (cadr ppss)) |
| 1632 | (fn (save-excursion | 1632 | (fn (save-excursion |
| 1633 | (if (and paren-pos | 1633 | (if (and paren-pos |
| 1634 | ;; PAREN-POS must be after the prompt | 1634 | ;; PAREN-POS must be after the prompt. |
| 1635 | (>= paren-pos | ||
| 1636 | (if (eq (get-buffer-process (current-buffer)) | ||
| 1637 | inferior-octave-process) | ||
| 1638 | (process-mark inferior-octave-process) | ||
| 1639 | (point-min))) | ||
| 1640 | (or (not (eq (get-buffer-process (current-buffer)) | 1635 | (or (not (eq (get-buffer-process (current-buffer)) |
| 1641 | inferior-octave-process)) | 1636 | inferior-octave-process)) |
| 1642 | (< (process-mark inferior-octave-process) | 1637 | (< (process-mark inferior-octave-process) |