[Emacs-diffs] /srv/bzr/emacs/trunk r112778: Use completion-at-point rather than obsolete alias.

[Glenn Morris]

------------------------------------------------------------
revno: 112778
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2013-05-29 20:20:56 -0700
message:
  Use completion-at-point rather than obsolete alias.
  
  * net/net-utils.el (nslookup-mode-map, ftp-mode-map):
  * progmodes/tcl.el (inferior-tcl-mode-map):
  Use completion-at-point rather than obsolete alias.
modified:
  lisp/ChangeLog
  lisp/net/net-utils.el
  lisp/progmodes/tcl.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-05-30 03:19:37 +0000
+++ b/lisp/ChangeLog    2013-05-30 03:20:56 +0000
@@ -1,5 +1,9 @@
 2013-05-30  Glenn Morris  <address@hidden>
 
+       * net/net-utils.el (nslookup-mode-map, ftp-mode-map):
+       * progmodes/tcl.el (inferior-tcl-mode-map):
+       Use completion-at-point rather than obsolete alias.
+
        * emacs-lisp/eieio.el (eieio-eval-default-p): Move before use.
 
        * minibuffer.el (read-file-name-completion-ignore-case):

=== modified file 'lisp/net/net-utils.el'
--- a/lisp/net/net-utils.el     2013-03-11 18:30:49 +0000
+++ b/lisp/net/net-utils.el     2013-05-30 03:20:56 +0000
@@ -497,7 +497,7 @@
 
 (defvar nslookup-mode-map
   (let ((map (make-sparse-keymap)))
-    (define-key map "\t" 'comint-dynamic-complete)
+    (define-key map "\t" 'completion-at-point)
     map))
 
 ;; Using a derived mode gives us keymaps, hooks, etc.
@@ -567,7 +567,7 @@
 (defvar ftp-mode-map
   (let ((map (make-sparse-keymap)))
     ;; Occasionally useful
-    (define-key map "\t" 'comint-dynamic-complete)
+    (define-key map "\t" 'completion-at-point)
     map))
 
 (define-derived-mode ftp-mode comint-mode "FTP"

=== modified file 'lisp/progmodes/tcl.el'
--- a/lisp/progmodes/tcl.el     2013-02-22 01:59:28 +0000
+++ b/lisp/progmodes/tcl.el     2013-05-30 03:20:56 +0000
@@ -266,7 +266,7 @@
   ;; Maybe someone has a better set?
   (let ((map (make-sparse-keymap)))
     ;; Will inherit from `comint-mode-map' thanks to define-derived-mode.
-    (define-key map "\t" 'comint-dynamic-complete)
+    (define-key map "\t" 'completion-at-point)
     (define-key map "\M-?" 'comint-dynamic-list-filename-completions)
     (define-key map "\177" 'backward-delete-char-untabify)
     (define-key map "\M-\C-x" 'tcl-eval-defun)