Changes

Jump to navigation Jump to search
192 bytes added ,  10:15, 24 April 2015
Line 60: Line 60:     
merge_props() will die if the database is read-only.
 
merge_props() will die if the database is read-only.
 +
 +
{
 +
    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;
 +
}
    
==== reset_props ====
 
==== reset_props ====

Navigation menu