From: Wang Diancheng <dcwang@kingbase.com.cn>
Date: Mon, 4 Jul 2011 17:50:55 +0000 (-0400)
Subject: * lisp/progmodes/gdb-mi.el (gdb): Use completion-at-point.
X-Git-Tag: emacs-pretest-24.0.90~104^2~152^2~189
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f932a347844c88e1586ffe3995c9a60ccd74668e;p=emacs.git

* lisp/progmodes/gdb-mi.el (gdb): Use completion-at-point.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 391a34206f4..2be81a92c90 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-07-04  Wang Diancheng  <dcwang@kingbase.com.cn>  (tiny change)
+
+	* progmodes/gdb-mi.el (gdb): Use completion-at-point.
+
 2011-07-04  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* files.el (find-file): Use pop-to-buffer-same-window (bug#8911).
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 61055ef4342..225d1eb8604 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -786,7 +786,10 @@ detailed description of this mode.
   (define-key gud-minor-mode-map [left-margin C-mouse-3]
     'gdb-mouse-jump)
 
-  (local-set-key "\C-i" 'gud-gdb-complete-command)
+  (add-hook 'completion-at-point-functions #'gud-gdb-completion-at-point
+            nil 'local)
+  (local-set-key "\C-i" 'completion-at-point)
+
   (setq gdb-first-prompt t)
   (setq gud-running nil)