From 852f60e7303687253d8a31224a82baa2a0eb23b4 Mon Sep 17 00:00:00 2001 From: dakkar Date: Sun, 29 Dec 2019 11:44:47 +0000 Subject: more standard layout & meta --- META6.json | 29 +++++++++++++++++++++++++++-- bayes | 23 ----------------------- bin/bayes | 23 +++++++++++++++++++++++ 3 files changed, 50 insertions(+), 25 deletions(-) delete mode 100644 bayes create mode 100644 bin/bayes diff --git a/META6.json b/META6.json index 030d536..a2101f6 100644 --- a/META6.json +++ b/META6.json @@ -5,11 +5,36 @@ "version": "2.000000", "authors": [ "dakkar" ], "description": "index maildirs, suggest folders", - "depends": [], + "provides": { + "MaildirIndexer::Parser": "lib/MaildirIndexer/Parser.pm6", + "MaildirIndexer::Server": "lib/MaildirIndexer/Server.pm6", + "MaildirIndexer::Store": "lib/MaildirIndexer/Store.pm6", + "MaildirIndexer::Email": "lib/MaildirIndexer/Email.pm6", + "MaildirIndexer::Index::ByRef": "lib/MaildirIndexer/Index/ByRef.pm6", + "MaildirIndexer::Index::ByAddresses": "lib/MaildirIndexer/Index/ByAddresses.pm6", + "MaildirIndexer::ScanDir": "lib/MaildirIndexer/ScanDir.pm6", + "MaildirIndexer::LogTimelineSchema": "lib/MaildirIndexer/LogTimelineSchema.pm6", + "MaildirIndexer::Index": "lib/MaildirIndexer/Index.pm6" + }, + "depends": { + "runtime": { + "requires": [ + "Log::Timeline" + ] + }, + "test": { + "requires": [ + "Test" + ], + "recommends": [ + "App::Prove6" + ] + } + }, "support": { "email": "dakkar@thenautilus.net", "source": "https://www.thenautilus.net/cgit/MaildirIndexer" }, - "license": "AGPL-3.0", + "license": "AGPL-3.0-only", "tags": [ "email" ] } diff --git a/bayes b/bayes deleted file mode 100644 index 93812d2..0000000 --- a/bayes +++ /dev/null @@ -1,23 +0,0 @@ -#!/usr/bin/env perl6 -use v6.d; -use lib $?FILE.IO.parent.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/bayes b/bin/bayes new file mode 100644 index 0000000..7383736 --- /dev/null +++ b/bin/bayes @@ -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