diff options
| author | Mauro Aranda | 2019-07-08 19:22:20 -0300 |
|---|---|---|
| committer | Eli Zaretskii | 2019-07-20 12:13:38 +0300 |
| commit | b6bef9f19311e4ea2287ac172f400d3146ba3cbb (patch) | |
| tree | 5bb1ce86c77ddeeb9ec9a0409277445f4e911cb3 | |
| parent | fd5410217ff23810edc16e97c10934ad622f8e4b (diff) | |
| download | emacs-b6bef9f19311e4ea2287ac172f400d3146ba3cbb.tar.gz emacs-b6bef9f19311e4ea2287ac172f400d3146ba3cbb.zip | |
Remove duplicated code in octave-eldoc-function
* lisp/progmodes/octave.el (octave-eldoc-function): The
test of position of the opening parenthesis in
inferior-octave-process was duplicated. Remove one of
the tests. (Bug#36557)
| -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) |