Remove bad use of map in void context, exclusively for side effects!

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/serials/serials-edit.pl b/serials/serials-edit.pl
index a7b01b6..f8e3b4c 100755 (executable)
--- 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;