blob: 59f95b16e274bc5b0af6dcd983bbe5a60e5a0e23 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
use v6.d; use Test; use MaildirIndexer::ScanDir; my BagHash $files; react { whenever scan-dir('t/fixtures') -> $f { ++$files{$f.path} if $f.f; done if $files.elems == 6; } } is-deeply( $files.keys.sort, $("t/fixtures/one/cur/1", "t/fixtures/one/cur/2", "t/fixtures/one/cur/3", "t/fixtures/one/cur/4", "t/fixtures/two/cur/1", "t/fixtures/two/cur/2"), 'initial scan ok', ); done-testing;
|