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

[Miles Bader]

Index: emacs/lisp/pcomplete.el
diff -c emacs/lisp/pcomplete.el:1.7 emacs/lisp/pcomplete.el:1.8
*** emacs/lisp/pcomplete.el:1.7 Mon Jul 16 08:22:58 2001
--- emacs/lisp/pcomplete.el     Sun Mar 10 23:15:11 2002
***************
*** 1,6 ****
  ;;; pcomplete.el --- programmable completion
  
! ;; Copyright (C) 1999, 2000, 2001 Free Sofware Foundation
  
  ;; Author: John Wiegley <address@hidden>
  ;; Keywords: processes abbrev
--- 1,6 ----
  ;;; pcomplete.el --- programmable completion
  
! ;; Copyright (C) 1999, 2000, 2001, 2002 Free Sofware Foundation
  
  ;; Author: John Wiegley <address@hidden>
  ;; Keywords: processes abbrev
***************
*** 703,709 ****
  \(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)
         (default-directory (expand-file-name
                             (or (file-name-directory name)
                                 default-directory)))
--- 703,709 ----
  \(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)
                                 default-directory)))