From 75c0bef66f71c56dd116774f5909d5fe3e4012b4 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Wed, 4 Jun 2008 15:21:40 -0500 Subject: [PATCH] Remove bad use of map in void context, exclusively for side effects! Signed-off-by: Joshua Ferraro --- serials/serials-edit.pl | 17 ++++++++--------- 1 file changed, 8 insertions(+), 9 deletions(-) diff --git a/serials/serials-edit.pl b/serials/serials-edit.pl index a7b01b68e6..f8e3b4cd7c 100755 --- a/serials/serials-edit.pl +++ b/serials/serials-edit.pl @@ -263,18 +263,17 @@ if ($op eq 'serialchangestatus') { my $redirect ="serials-collection.pl?"; my %hashsubscription; - map{$hashsubscription{$_}=1} @subscriptionids; + foreach (@subscriptionids) { + $hashsubscription{$_}=1; + } $redirect.=join("&",map{"subscriptionid=".$_} sort keys %hashsubscription); print $query->redirect("$redirect"); } -$template->param(serialsadditems =>C4::Context->preference("serialsadditems")); - - - $template->param( - bibliotitle => $bibdata->{'title'}, - biblionumber =>$serialdatalist[0]->{'biblionumber'}, - serialslist => \@serialdatalist, - ); + serialsadditems => C4::Context->preference("serialsadditems"), + bibliotitle => $bibdata->{'title'}, + biblionumber => $serialdatalist[0]->{'biblionumber'}, + serialslist => \@serialdatalist, +); output_html_with_http_headers $query, $cookie, $template->output; -- 2.11.0