aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emacs-lisp/authors.el
diff options
context:
space:
mode:
authorDave Love <[email protected]>2001-02-09 15:12:08 +0000
committerDave Love <[email protected]>2001-02-09 15:12:08 +0000
commitd2f288c69510feaac53886d18390a7334fd82a14 (patch)
tree79d2ebc6c2ead27e79acb0298989525acaa316ab /lisp/emacs-lisp/authors.el
parent0f937ebd995212c5ed8f4615f556513fa01a7f17 (diff)
(authors): Expand `root' before running
find.
Diffstat (limited to 'lisp/emacs-lisp/authors.el')
-rw-r--r--lisp/emacs-lisp/authors.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/authors.el b/lisp/emacs-lisp/authors.el
index e818ca88d6..909f741f88 100644
--- a/lisp/emacs-lisp/authors.el
+++ b/lisp/emacs-lisp/authors.el
@@ -428,10 +428,10 @@ ROOT is the root directory under which to find the files. If called
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))