11 lines
199 B
Plaintext
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;
|
|
}
|