initial commit of file from CVS for e-smith-email on Wed 12 Jul 08:53:55 BST 2023
This commit is contained in:
10
root/etc/e-smith/db/configuration/migrate/30popd
Normal file
10
root/etc/e-smith/db/configuration/migrate/30popd
Normal file
@@ -0,0 +1,10 @@
|
||||
{
|
||||
my $popd = $DB->get("popd") or return;
|
||||
|
||||
my $pop3 = $DB->get("pop3") ||
|
||||
$DB->new_record("pop3", { type => "service" });
|
||||
|
||||
$pop3->merge_props($popd->props);
|
||||
|
||||
$popd->delete;
|
||||
}
|
Reference in New Issue
Block a user