summaryrefslogtreecommitdiff
path: root/lisp/progmodes/octave-mod.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-10-24 03:48:37 +0000
committerGlenn Morris <rgm@gnu.org>2009-10-24 03:48:37 +0000
commitae4808385bc40f1e8fbb3cc4bf49544cacb38913 (patch)
treee3daad9ae3e321a0f91004e153a53d75cfc641e5 /lisp/progmodes/octave-mod.el
parent9847dc91f357360142365824007cca3b8b8b15fd (diff)
downloademacs-ae4808385bc40f1e8fbb3cc4bf49544cacb38913.tar.gz
(octave-complete-symbol): Use choose-completion if
mouse-choose-completion is ever removed.
Diffstat (limited to 'lisp/progmodes/octave-mod.el')
-rw-r--r--lisp/progmodes/octave-mod.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/progmodes/octave-mod.el b/lisp/progmodes/octave-mod.el
index 6f5a69f890a..0671dbe807a 100644
--- a/lisp/progmodes/octave-mod.el
+++ b/lisp/progmodes/octave-mod.el
@@ -1268,7 +1268,9 @@ variables."
(get-buffer "*Completions*"))
(eq (key-binding key) 'mouse-choose-completion)))
(progn
- (mouse-choose-completion first)
+ (if (fboundp 'mouse-choose-completion)
+ (mouse-choose-completion first)
+ (choose-completion first)) ; Emacs >= 23.2
(set-window-configuration conf))
(if (eq first ?\ )
(set-window-configuration conf)