smeserver-base/root/etc/e-smith/db/configuration/migrate/05syslog2rsyslog

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;
}