[Emacs-diffs] Changes to emacs/lisp/pcomplete.el

[Richard M. Stallman]

Index: emacs/lisp/pcomplete.el
diff -c emacs/lisp/pcomplete.el:1.8 emacs/lisp/pcomplete.el:1.9
*** emacs/lisp/pcomplete.el:1.8 Sun Mar 10 23:15:11 2002
--- emacs/lisp/pcomplete.el     Wed Jul 31 18:01:54 2002
***************
*** 695,708 ****
  
  (defun pcomplete-entries (&optional regexp predicate)
    "Complete against a list of directory candidates.
- This function always uses the last argument as the basis for
- completion.
  If REGEXP is non-nil, it is a regular expression used to refine the
  match (files not matching the REGEXP will be excluded).
  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 (substitute-env-vars pcomplete-stub))
         (default-directory (expand-file-name
                             (or (file-name-directory name)
--- 695,706 ----
  
  (defun pcomplete-entries (&optional regexp predicate)
    "Complete against a list of directory candidates.
  If REGEXP is non-nil, it is a regular expression used to refine the
  match (files not matching the REGEXP will be excluded).
  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 no directory information can be extracted from the completed
! component, DEFAULT-DIRECTORY is used as the basis for completion."
    (let* ((name (substitute-env-vars pcomplete-stub))
         (default-directory (expand-file-name
                             (or (file-name-directory name)