lib/Config/ClawsMail/Server.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

package Config::ClawsMail::Server; 
use v5.26;
use Moo;
# VERSION 
use Types::Standard qw(Str Enum ArrayRef);
use namespace::clean;
 
# ABSTRACT: Claws-Mail send/receive server 
 
has [qw(host port)] => (
    is => 'ro',
    required => 1,
    isa => Str,
);
 
has [qw(user_id password)] => (
    is => 'ro',
    isa => Str,
);
 
has 'auth_methods' => (
    is => 'ro',
    isa => ArrayRef[Str],
);
 
has ssl => (
    is => 'ro',
    isa => Enum[qw(no ssl starttls)],
    default => sub { 'no' },
);
 
1;