Fix shell completion regression.

* lisp/shell.el (shell-dynamic-complete-functions): Put
pcomplete-completions-at-point, so as to try
comint-filename-completion first (Bug#10417).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 055d929fc51153542e12d5fbd46d52f7533a3aa8..8679b2c4f59fc609978536d5acf6b258c08b5efa 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2012-01-03  Chong Yidong  <cyd@gnu.org>
+
+       * shell.el (shell-dynamic-complete-functions): Put
+       pcomplete-completions-at-point, so as to try
+       comint-filename-completion first (Bug#10417).
+
 2012-01-02  Richard Stallman  <rms@gnu.org>
 
        * battery.el (battery-status-function):

diff --git a/lisp/shell.el b/lisp/shell.el
index 7da1add8e9aff5d2b3a0c84f6e2bcdeb162eeeb9..4e570c6326a589fcb161acadc3c3bc2073a80470 100644 (file)
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -187,10 +187,11 @@ This is a fine thing to set in your `.emacs' file.")
     shell-environment-variable-completion
     shell-command-completion
     shell-c-a-p-replace-by-expanded-directory
-    pcomplete-completions-at-point
     shell-filename-completion
-    ;; Not sure when this one would still be useful.  --Stef
-    comint-filename-completion)
+    comint-filename-completion
+    ;; This goes last, so that `comint-filename-completion' can handle
+    ;; `shell-completion-execonly' (Bug#10417).
+    pcomplete-completions-at-point)
   "List of functions called to perform completion.
 This variable is used to initialize `comint-dynamic-complete-functions' in the
 shell buffer.