Bug 10855: Additional marc fields are not inserted

[koha.git] / serials / subscription-history.pl

diff --git a/serials/subscription-history.pl b/serials/subscription-history.pl
index a45074f..267afcb 100755 (executable)
--- a/serials/subscription-history.pl
+++ b/serials/subscription-history.pl
@@ -29,7 +29,7 @@ Modify subscription history
 
 use Modern::Perl;
 
-use CGI;
+use CGI qw ( -utf8 );
 use C4::Auth;
 use C4::Output;
 
@@ -71,7 +71,7 @@ if($op && $op eq 'mod') {
     exit;
 } else {
     my $history = GetSubscriptionHistoryFromSubscriptionId($subscriptionid);
-    my (undef, $biblio) = GetBiblio($history->{'biblionumber'});
+    my $biblio  = GetBiblio($history->{'biblionumber'});
 
     $template->param(
         subscriptionid  => $subscriptionid,