From 9d9d2806f068a0a22c985c5660606e90a796cede Mon Sep 17 00:00:00 2001 From: dakkar Date: Wed, 27 Jan 2016 10:21:34 +0000 Subject: dzil works --- lib/Config/ClawsMail/Account.pm | 3 +++ lib/Config/ClawsMail/Password.pm | 3 +++ lib/Config/ClawsMail/Server.pm | 3 +++ 3 files changed, 9 insertions(+) (limited to 'lib/Config/ClawsMail') diff --git a/lib/Config/ClawsMail/Account.pm b/lib/Config/ClawsMail/Account.pm index c00bad4..4f51273 100644 --- a/lib/Config/ClawsMail/Account.pm +++ b/lib/Config/ClawsMail/Account.pm @@ -1,10 +1,13 @@ package Config::ClawsMail::Account; use Moo; +# VERSION use 5.020; use Types::Standard qw(Str InstanceOf); use Config::ClawsMail::Server; use namespace::clean; +# ABSTRACT: Claws-Mail account + has [qw(account_name name address)] => ( is => 'ro', required => 1, diff --git a/lib/Config/ClawsMail/Password.pm b/lib/Config/ClawsMail/Password.pm index 867fbe4..ec6f8af 100644 --- a/lib/Config/ClawsMail/Password.pm +++ b/lib/Config/ClawsMail/Password.pm @@ -1,10 +1,13 @@ package Config::ClawsMail::Password; use strict; use warnings; +# VERSION use Config::ClawsMail::Password::Inline 'C'; use MIME::Base64; use namespace::clean -except => [qw(decrypt_password)]; +# ABSTRACT: Claws-Mail password decrypter + sub cleartext_password { my ($password) = @_; return decrypt_password(decode_base64($password)); diff --git a/lib/Config/ClawsMail/Server.pm b/lib/Config/ClawsMail/Server.pm index e3eefab..a996e4f 100644 --- a/lib/Config/ClawsMail/Server.pm +++ b/lib/Config/ClawsMail/Server.pm @@ -1,9 +1,12 @@ package Config::ClawsMail::Server; use Moo; +# VERSION use Types::Standard qw(Str Enum); use Config::ClawsMail::Password; use namespace::clean; +# ABSTRACT: Claws-Mail send/receive server + has [qw(host port)] => ( is => 'ro', required => 1, -- cgit v1.2.3