diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2011-02-21 20:14:56 +0100 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2011-02-21 20:14:56 +0100 |
commit | c63090455fe67ba5788aa23a5223655c2cbe9351 (patch) | |
tree | 626bd390f67903949f2793ed817fc0f982cc84bb /lisp/net/tramp.el | |
parent | 6ca1c3b4f26d01d3e9125986ca8e8f31eb1bf6bc (diff) | |
download | emacs-c63090455fe67ba5788aa23a5223655c2cbe9351.tar.gz |
* net/tramp.el (tramp-rfn-eshadow-setup-minibuffer): Do not use
`field' property of `rfn-eshadow-overlay'.
Diffstat (limited to 'lisp/net/tramp.el')
-rw-r--r-- | lisp/net/tramp.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 9be093743b5..fc167d6e62e 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el @@ -1574,8 +1574,12 @@ special handling of `substitute-in-file-name'." (let ((props (tramp-compat-funcall 'overlay-properties (symbol-value 'rfn-eshadow-overlay)))) (while props - (tramp-compat-funcall - 'overlay-put tramp-rfn-eshadow-overlay (pop props) (pop props)))))) + ;; The `field' property prevents correct minibuffer + ;; completion; we exclude it. + (if (not (eq (car props) 'field)) + (tramp-compat-funcall + 'overlay-put tramp-rfn-eshadow-overlay (pop props) (pop props)) + (pop props) (pop props)))))) (when (boundp 'rfn-eshadow-setup-minibuffer-hook) (add-hook 'rfn-eshadow-setup-minibuffer-hook |