From: Jan Büren Date: Wed, 30 Nov 2011 12:57:03 +0000 (+0100) Subject: Die Variable $readonly in display_row wird niemals ausgelesen. X-Git-Tag: release-2.7.0beta1~155^2~7 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=1ed2847584d7d52092876817cd6678126f9e9421;p=kivitendo-erp.git Die Variable $readonly in display_row wird niemals ausgelesen. S.a. Anmerkung von Sven: ...und hier wird es nur gesetzt, aber nicht konsumiert. Seit den strict Änderungen wird auch keine Variable mehr indirekt aufgerufen (a la $name = 'readobly'; print $$name), und wird auch nicht implizit an html oder print Templates weitergeleitet. git blame sagt zu io.pl:127: commit d707f7ac60b9dbe7da50d733db1e73eae84952f7 Author: Moritz Bunkus Date: Fri Jan 18 17:01:49 2008 +0000 Lieferscheine im Einkauf und Verkauf. Bisher nur gemerget, noch nicht getestet. ...der Commit ist berüchtigt, weil Mosu da nur die Aufträge copy&pasted hat, und tabellen und bezeichner geändert hat. In dem Commit sind ein paar tote Codestellen reingekommen. Ich würd sagen, kannste rausschmeissen. --- diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index bef9a849d..c34913a71 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -116,7 +116,7 @@ sub display_row { my $numrows = shift; - my ($readonly, $stock_in_out, $stock_in_out_title); + my ($stock_in_out, $stock_in_out_title); my $is_purchase = (first { $_ eq $form->{type} } qw(request_quotation purchase_order purchase_delivery_order)) || ($form->{script} eq 'ir.pl'); my $show_min_order_qty = first { $_ eq $form->{type} } qw(request_quotation purchase_order); @@ -124,8 +124,6 @@ sub display_row { my $is_s_p_order = (first { $_ eq $form->{type} } qw(sales_order purchase_order)); if ($is_delivery_order) { - $readonly = ' readonly' if ($form->{closed}); - if ($form->{type} eq 'sales_delivery_order') { $stock_in_out_title = $locale->text('Release From Stock'); $stock_in_out = 'out';