emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp ChangeLog progmodes/octave-mod.el


From: Glenn Morris
Subject: [Emacs-diffs] emacs/lisp ChangeLog progmodes/octave-mod.el
Date: Sat, 24 Oct 2009 03:48:41 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/10/24 03:48:40

Modified files:
        lisp           : ChangeLog 
        lisp/progmodes : octave-mod.el 

Log message:
        (octave-complete-symbol): Use choose-completion if
        mouse-choose-completion is ever removed.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16494&r2=1.16495
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/progmodes/octave-mod.el?cvsroot=emacs&r1=1.50&r2=1.51

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16494
retrieving revision 1.16495
diff -u -b -r1.16494 -r1.16495
--- ChangeLog   24 Oct 2009 03:45:50 -0000      1.16494
+++ ChangeLog   24 Oct 2009 03:48:37 -0000      1.16495
@@ -1,5 +1,8 @@
 2009-10-24  Glenn Morris  <address@hidden>
 
+       * progmodes/octave-mod.el (octave-complete-symbol): Use
+       choose-completion if mouse-choose-completion is ever removed.
+
        * textmodes/sgml-mode.el (sgml-looking-back-at): Move definition before
        use.
 

Index: progmodes/octave-mod.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/octave-mod.el,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -b -r1.50 -r1.51
--- progmodes/octave-mod.el     9 Jan 2009 04:16:00 -0000       1.50
+++ progmodes/octave-mod.el     24 Oct 2009 03:48:40 -0000      1.51
@@ -1268,7 +1268,9 @@
                              (get-buffer "*Completions*"))
                          (eq (key-binding key) 'mouse-choose-completion)))
                   (progn
+                    (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)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]