11 lines
220 B
Plaintext
11 lines
220 B
Plaintext
|
{
|
||
|
|
my $auth = $DB->get('auth');
|
||
|
|
my $oidentd = $DB->get('oidentd');
|
||
|
|
if ($auth)
|
||
|
|
{
|
||
|
|
$oidentd ||= $DB->new_record('oidentd', {type => 'service'});
|
||
|
|
$oidentd->merge_props($auth->props);
|
||
|
|
$auth->delete;
|
||
|
|
}
|
||
|
|
}
|