aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMauro Aranda2019-07-08 19:22:20 -0300
committerEli Zaretskii2019-07-20 12:13:38 +0300
commitb6bef9f19311e4ea2287ac172f400d3146ba3cbb (patch)
tree5bb1ce86c77ddeeb9ec9a0409277445f4e911cb3
parentfd5410217ff23810edc16e97c10934ad622f8e4b (diff)
downloademacs-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.el7
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)