Mercurial > emacs
changeset 36010:c486995553f8
(authors): Expand `root' before running
find.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Fri, 09 Feb 2001 15:11:47 +0000 |
| parents | 3f009240cc7d |
| children | 1a897a8b087a |
| files | lisp/emacs-lisp/authors.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/authors.el Fri Feb 09 12:35:36 2001 +0000 +++ b/lisp/emacs-lisp/authors.el Fri Feb 09 15:11:47 2001 +0000 @@ -428,10 +428,10 @@ interactively, ROOT is read from the minibuffer. Result is a buffer *Authors* containing authorship information." (interactive "DEmacs source directory: ") + (setq root (expand-file-name root)) (let ((logs (authors-process-lines "find" root "-name" "ChangeLog*")) (table (make-hash-table :test 'equal)) (buffer-name "*Authors*")) - (setq root (expand-file-name root)) (authors-add-fixed-entries table) (unless (file-exists-p (expand-file-name "src/emacs.c" root)) (error "Not the root directory of Emacs: %s" root))