From 72522a316d83178e155651ec7cd596ce950eb51d Mon Sep 17 00:00:00 2001 From: dakkar Date: Sun, 29 Dec 2019 11:46:33 +0000 Subject: better name --- bin/bayes | 23 ----------------------- bin/maildir-indexer | 23 +++++++++++++++++++++++ 2 files changed, 23 insertions(+), 23 deletions(-) delete mode 100644 bin/bayes create mode 100644 bin/maildir-indexer 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() -} diff --git a/bin/maildir-indexer b/bin/maildir-indexer new file mode 100644 index 0000000..7383736 --- /dev/null +++ b/bin/maildir-indexer @@ -0,0 +1,23 @@ +#!/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() +} -- cgit v1.2.3