smeserver-tftp-server/root/etc/e-smith/db/configuration/migrate/tftpd.v10

11 lines
199 B
Plaintext

{
my $tftpd = $DB->get("tftpd") or return;
my $tftp = $DB->get("tftp") ||
$DB->new_record("tftp", { type => "service" });
$tftp->merge_props($tftpd->props);
$tftpd->delete;
}