+ my %dont_save_vars = map { $_ => 1 } Drafts->dont_save;
+ my @restore_vars = grep { !$dont_save_vars{$_} } keys %{ $old_form };
+
+ @{$form}{@restore_vars} = @{$old_form}{@restore_vars};
+
+ $form->{draft_id} = $id;
+ $form->{draft_description} = $description;
+ $form->{remove_draft} = 'checked';
+ }
+ # Ich vergesse bei Rechnungsentwürfe das Rechnungsdatum zu ändern. Dadurch entstehen
+ # ungültige Belege. Vielleicht geht es anderen ähnlich jan 19.2.2011
+ $form->{invdate} = $form->current_date(\%myconfig); # Aktuelles Rechnungsdatum ...
+ $form->{duedate} = $form->current_date(\%myconfig); # Aktuelles Fälligkeitsdatum ...