X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/08c79c2c65b17701c1f42d9a2b4623d7bd806120..ca18e0478035f63:/bin/mozilla/io.pl diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index 56a0354ef..0ba19916f 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1196,12 +1196,17 @@ sub print { } $form->{print_and_save} = 1; my $formname = $form->{formname}; - &save(); + save(); $form->{formname} = $formname; - &edit(); + edit(); $::lxdebug->leave_sub(); ::end_of_request(); } + elsif (($form->{type} =~ /_order$/) || ($form->{type} =~ /_quotation$/)) { + $form->{print_and_save} = 1; + save(); + } + &print_form($old_form);