diff options
Diffstat (limited to 'bayes')
-rw-r--r-- | bayes | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -1,13 +1,15 @@ #!/usr/bin/env perl6 use v6.d.PREVIEW; use lib 'lib'; +use MaildirIndexer::ScanDir; use MaildirIndexer::Store; use MaildirIndexer::Server; use MaildirIndexer::Index::ByRef; sub MAIN($maildir) { + my $file-channel = scan-dir($maildir).Channel; my $store = MaildirIndexer::Store.new( - :$maildir, + :$file-channel, indices => MaildirIndexer::Index::ByRef.new, ); |