11 lines
252 B
Plaintext
11 lines
252 B
Plaintext
|
{
|
||
|
|
|
||
|
|
my $imap = $DB->get('imap') ||
|
||
|
|
$DB->new_record('imap', {type => 'service'});
|
||
|
|
my $status = $imap->prop('status') || 'disabled';
|
||
|
|
return "" if ($status eq 'enabled');
|
||
|
|
$imap->set_prop('status', 'enabled');
|
||
|
|
$imap->set_prop('access', 'localhost');
|
||
|
|
|
||
|
|
}
|