+2018-11-23 Ben Elliston <bje@gnu.org>
+
+ * doc/dejagnu.texi (getdirs procedure): Improve documentation
+ including documenting the -all option.
+ (find procedure): Fix a typo.
+ * lib/utils.exp (getdirs): Improve comments.
+
2018-11-22 Jacob Bachmeyer <jcb62281@gmail.com>
* runtest.exp: Ensure that multipass pass variables are always
@node getdirs procedure, find procedure, , Utility Procedures
@subsubsection getdirs Procedure
-Returns a list of all the directories in the single directory a single
-directory that match an optional pattern.
+Returns a list of all the subdirectories in a single directory that
+match a glob pattern.
@quotation
-@t{@b{getdirs}@{@i{rootdir}
+@t{@b{getdirs}@{@i{-all}
+@i{rootdir}
@i{pattern}@}}
@end quotation
@table @asis
-@item @code{args}
+
+@item @code{-all}
+If this option is given, then subdirectories will be matched
+recursively.
+
+@item @code{rootdir}
+The top level directory to start the search from.
@item @code{pattern}
-If you do not specify @code{pattern}, @code{Getdirs} assumes a default
-pattern of @emph{*}. You may use the common shell wildcard characters in
-the pattern. If no directories match the pattern, then a NULL string is
+If you do not specify @code{pattern}, @code{getdirs} uses a default
+pattern of @code{*}. You may use the common shell wildcard characters in
+the pattern. If no directories match the pattern, then an empty list is
returned.
@end table
@table @asis
@item @code{rootdir}
-The top level directory to search the search from.
+The top level directory to start the search from.
@item @code{pattern}
A csh "glob" style regular expression representing the files to find.
# Gets the directories in a directory, or in a directory tree.
-# args: the first is the dir to look in, the next
-# is the pattern to match. It
-# defaults to *. Patterns are csh style
-# globbing rules
+# args: the first is the directory to look in, the next is the
+# glob pattern to match (default "*").
# options: -all search the tree recursively
-# returns: a list of dirs or NULL; the root directory is not returned.
+# returns: a list of directories excluding the root directory
#
proc getdirs { args } {
if { [lindex $args 0] == "-all" } {