X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fdrafts.pl;fp=bin%2Fmozilla%2Fdrafts.pl;h=b575715ce353f9e390b503335e59dc178e836551;hb=b9f6d2f5eb8fed1feae2554af76a4f1bebce3e87;hp=18af531f2246dc4b4ef58c1775401ff5199aeaea;hpb=805bd93013dc4ec6d0f5504ea25b7cf58359fda2;p=kivitendo-erp.git diff --git a/bin/mozilla/drafts.pl b/bin/mozilla/drafts.pl index 18af531f2..b575715ce 100644 --- a/bin/mozilla/drafts.pl +++ b/bin/mozilla/drafts.pl @@ -7,6 +7,8 @@ # #====================================================================== +use YAML; + use SL::Drafts; require "bin/mozilla/common.pl"; @@ -98,7 +100,8 @@ sub load_draft { my ($old_form, $id, $description) = Drafts->load(\%myconfig, $form, $form->{id}); if ($old_form) { - restore_form($old_form, 1); + $old_form = YAML::Load($old_form); + @{$form}{keys %{ $old_form } } = @{$old_form}{keys %{ $old_form } }; $form->{draft_id} = $id; $form->{draft_description} = $description; $form->{remove_draft} = 'checked';