| … | … | ||
|---|---|---|---|
| 65 | 65 | ||
| 66 | aioreq_pri -1; | 66 | aioreq_pri -1; |
| 67 | ++$n_dirs; | 67 | ++$n_dirs; |
| 68 | aio_scandir $path, 8, sub { | 68 | aio_scandir $path, 8, sub { |
| 69 | my ($dirs, $files) = @_ | 69 | my ($dirs, $files) = @_ |
| 70 | or warn "$path: $!\n"; | 70 | or return warn "$path: $!\n"; |
| 71 | 71 | ||
| 72 | printfn "", [$path] unless $opt_nodirs; | 72 | printfn "", [$path] unless $opt_nodirs; |
| 73 | printfn $path, $files unless $opt_nofiles; | 73 | printfn $path, $files unless $opt_nofiles; |
| 74 | 74 | ||
| 75 | $n_files += @$files; | 75 | $n_files += @$files; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |