diff options
Diffstat (limited to 'bin/bayes')
-rw-r--r-- | bin/bayes | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/bin/bayes b/bin/bayes deleted file mode 100644 index 7383736..0000000 --- a/bin/bayes +++ /dev/null @@ -1,23 +0,0 @@ -#!/usr/bin/env perl6 -use v6.d; -use lib $?FILE.IO.parent(2).child('lib'); -use MaildirIndexer::ScanDir; -use MaildirIndexer::Store; -use MaildirIndexer::Server; -use MaildirIndexer::Index::ByRef; -use MaildirIndexer::Index::ByAddresses; - -sub MAIN($maildir) { - my $file-channel = scan-dir($maildir).Channel; - my $store = MaildirIndexer::Store.new( - :$file-channel, - indices => ( - MaildirIndexer::Index::ByRef.new, - MaildirIndexer::Index::ByAddresses.new, - ), - ); - - my $server = MaildirIndexer::Server.new(:$store); - $store.start(); - $server.serve() -} |