mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-28 10:56:36 +00:00
(pcomplete-entries): Expand environment variables in filename.
This commit is contained in:
parent
a0db0bbfdb
commit
8a5782b5da
@ -1,3 +1,8 @@
|
||||
2002-03-07 Miles Bader <miles@gnu.org>
|
||||
|
||||
* pcomplete.el (pcomplete-entries): Expand environment variables
|
||||
in filename.
|
||||
|
||||
2002-03-10 Daniel Pfeiffer <occitan@esperanto.org>
|
||||
|
||||
* play/mpuz.el: Use defface instead of facemenu-get-face.
|
||||
|
@ -1,6 +1,6 @@
|
||||
;;; pcomplete.el --- programmable completion
|
||||
|
||||
;; Copyright (C) 1999, 2000, 2001 Free Sofware Foundation
|
||||
;; Copyright (C) 1999, 2000, 2001, 2002 Free Sofware Foundation
|
||||
|
||||
;; Author: John Wiegley <johnw@gnu.org>
|
||||
;; Keywords: processes abbrev
|
||||
@ -703,7 +703,7 @@ If PREDICATE is non-nil, it will also be used to refine the match
|
||||
\(files for which the PREDICATE returns nil will be excluded).
|
||||
If PATH is non-nil, it will be used for completion instead of
|
||||
consulting the last argument."
|
||||
(let* ((name pcomplete-stub)
|
||||
(let* ((name (substitute-env-vars pcomplete-stub))
|
||||
(default-directory (expand-file-name
|
||||
(or (file-name-directory name)
|
||||
default-directory)))
|
||||
|
Loading…
Reference in New Issue
Block a user