--- toast 2003/08/24 23:31:55 1.176 +++ toast 2003/08/24 23:37:53 1.177 @@ -342,6 +342,12 @@ @result; } +sub optls($) +{ + my($dir) = @_; + return -e($dir) ? ls($dir) : (); +} + sub absls($) { my($dir) = @_; @@ -1095,7 +1101,7 @@ sub allnames(;$) { - @_ && defined($_[0]) ? @_ : sort cmpab ls(pkgpath); + @_ && defined($_[0]) ? @_ : sort cmpab optls(pkgpath); } sub allversions($;$)