Revision 066dbf0a
Von Moritz Bunkus vor etwa 15 Jahren hinzugefügt
bin/mozilla/oe.pl | ||
---|---|---|
38 | 38 |
use SL::OE; |
39 | 39 |
use SL::IR; |
40 | 40 |
use SL::IS; |
41 |
use SL::MoreCommon qw(ary_diff); |
|
41 | 42 |
use SL::PE; |
42 | 43 |
use SL::ReportGenerator; |
43 | 44 |
use List::Util qw(max reduce sum); |
... | ... | |
1092 | 1093 |
|
1093 | 1094 |
$form->{simple_save} = 1; |
1094 | 1095 |
if(!$form->{print_and_save}) { |
1095 |
set_headings("edit");
|
|
1096 |
&update;
|
|
1096 |
delete @{$form}{ary_diff([keys %{ $form }], [qw(login stylesheet id script type)])};
|
|
1097 |
edit();
|
|
1097 | 1098 |
exit; |
1098 | 1099 |
} |
1099 | 1100 |
$lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Nach dem Speichern Auftrag neu laden, weil die orderitem_ids ansonsten nicht gesetzt sind.