11 lines
218 B
Plaintext
11 lines
218 B
Plaintext
|
{
|
||
|
|
my $syslog = $DB->get("syslog") or return;
|
||
|
|
|
||
|
|
my $rsyslog = $DB->get("rsyslog") ||
|
||
|
|
$DB->new_record("rsyslog", { type => "service" });
|
||
|
|
|
||
|
|
$rsyslog->merge_props($syslog->props);
|
||
|
|
|
||
|
|
$syslog->delete;
|
||
|
|
}
|