summaryrefslogtreecommitdiff
path: root/bayes
diff options
context:
space:
mode:
Diffstat (limited to 'bayes')
-rw-r--r--bayes4
1 files changed, 3 insertions, 1 deletions
diff --git a/bayes b/bayes
index 0bb9d3e..a99a3e9 100644
--- a/bayes
+++ b/bayes
@@ -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,
);