diff options
| author | Paul Eggert | 2017-01-01 01:02:47 -0800 |
|---|---|---|
| committer | Paul Eggert | 2017-01-01 01:02:47 -0800 |
| commit | 61848d2da32bb889d714fcddcb7dfd6dfa1b502d (patch) | |
| tree | bec14e4a5ad9051ad310273db7fcc1d2164488b7 /lisp/files.el | |
| parent | bbb683f04aa0960422b12af5ef79679344fac19c (diff) | |
| parent | 697167b5432a89db009238cf5cbddc61e69ad339 (diff) | |
| download | emacs-61848d2da32bb889d714fcddcb7dfd6dfa1b502d.tar.gz emacs-61848d2da32bb889d714fcddcb7dfd6dfa1b502d.zip | |
Merge from origin/emacs-25
697167b ; Improve wording of previous change in variables.texi
d7973e8 Document 'default-toplevel-value' and 'set-default-toplevel-v...
8b71826 Don't modify minibuffer variables globally
5b5e036 Revert to pre-25.1 behavior in ffap
19994a1 * lisp/ffap.el: Fix obsolete comment referencing ffap-bug.
3ace730 Attempt to fix 64-bit AIX build
f69bd79 Clarify usage of 'ediff-cleanup-hook' (Bug#24675)
c04ac8a Document that variable binding order is unspecified
272554a * lisp/desktop.el (desktop-buffers-not-to-save): Doc fix.
08de101 Fix M-x hints on Mac port
86a297a Work around reporting a dpi change in apply_xft_settings
cf1f985 ; lisp/skeleton.el (skeleton-insert): Fix typo in last change
9e1209d Amend the version number of CC Mode 5.33 -> 5.32.99. Don't m...
88cdf14 Improve skeleton docstrings
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/files.el b/lisp/files.el index 790f6cedfd6..71398227407 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -716,13 +716,13 @@ The path separator is colon in GNU and GNU-like systems." | |||
| 716 | ;; (which will lead to the use of B/a). | 716 | ;; (which will lead to the use of B/a). |
| 717 | (minibuffer-with-setup-hook | 717 | (minibuffer-with-setup-hook |
| 718 | (lambda () | 718 | (lambda () |
| 719 | (setq minibuffer-completion-table | 719 | (setq-local minibuffer-completion-table |
| 720 | (apply-partially #'locate-file-completion-table | 720 | (apply-partially #'locate-file-completion-table |
| 721 | cd-path nil)) | 721 | cd-path nil)) |
| 722 | (setq minibuffer-completion-predicate | 722 | (setq-local minibuffer-completion-predicate |
| 723 | (lambda (dir) | 723 | (lambda (dir) |
| 724 | (locate-file dir cd-path nil | 724 | (locate-file dir cd-path nil |
| 725 | (lambda (f) (and (file-directory-p f) 'dir-ok)))))) | 725 | (lambda (f) (and (file-directory-p f) 'dir-ok)))))) |
| 726 | (unless cd-path | 726 | (unless cd-path |
| 727 | (setq cd-path (or (parse-colon-path (getenv "CDPATH")) | 727 | (setq cd-path (or (parse-colon-path (getenv "CDPATH")) |
| 728 | (list "./")))) | 728 | (list "./")))) |