From: Eric S. Raymond Date: Wed, 3 Dec 2014 23:26:34 +0000 (-0500) Subject: Fix punctuation glitches in file-tree-walk docstring. X-Git-Tag: emacs-25.0.90~2635^2~210 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=de909179393f2052eeb5dd0738bcdc582e654b14;p=emacs.git Fix punctuation glitches in file-tree-walk docstring. * files.el (file-tree-walk): Fix docstring. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2309fc57e79..2ff0a2d8d16 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2014-12-03 Eric S. Raymond + + * files.el (file-tree-walk): Fix docstring. + 2014-12-03 Karl Fogel Fix bug whereby saving files hung in VC hook. diff --git a/lisp/files.el b/lisp/files.el index 720a633761a..740a00a41e3 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -730,11 +730,11 @@ The path separator is colon in GNU and GNU-like systems." (error "No such directory found via CDPATH environment variable")))) (defun file-tree-walk (dir action &rest args) - "Walk DIR executing ACTION. Each call gets as arguments DIR, a file path, -and optional ARGS. The ACTION is applied to each subdirectory -before descending into it, and if nil is returned at that point -the descent will be prevented. Directory entries are sorted with -string-lessp" + "Walk DIR executing ACTION on each path, with ARGS as additional arguments. +Each call gets as arguments DIR, a file path, and optional ARGS. +The ACTION is applied to each subdirectory before descending into +it, and if nil is returned at that point the descent will be +prevented. Directory entries are sorted with string-lessp." (cond ((file-directory-p dir) (or (char-equal ?/ (aref dir (1- (length dir)))) (setq dir (file-name-as-directory dir)))