From 894435ec9b9b65ebc72dd502834d94458dd70d9b Mon Sep 17 00:00:00 2001
From: Alex Arnaud <alex.arnaud@biblibre.com>
Date: Wed, 15 Apr 2020 09:43:16 +0200
Subject: [PATCH] Bug 17656: fix QA tools warnings

Signed-off-by: David Nind <david@davidnind.com>
---
 .../intranet-tmpl/prog/en/modules/serials/showpredictionpattern.tt      | 2 +-
 serials/subscription-renew.pl                                           | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/showpredictionpattern.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/serials/showpredictionpattern.tt
index 6016fe061d..f9373b3446 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/showpredictionpattern.tt
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/serials/showpredictionpattern.tt
@@ -6,7 +6,7 @@
 [% IF (ask_for_irregularities) %]
     <p><em>Please check issues that are NOT published (irregularities)</em></p>
     [% IF (show_irregularity_options) %]
-        <script type="text/javascript">
+        <script>
         //<![CDATA[
         $(document).ready(function(){
             Check_permanent_irregularities();
diff --git a/serials/subscription-renew.pl b/serials/subscription-renew.pl
index c19979cf75..7917a4dec0 100755
--- a/serials/subscription-renew.pl
+++ b/serials/subscription-renew.pl
@@ -104,7 +104,7 @@ if ( $op eq "renew" ) {
         }
     );
 
-    my $subscription = Koha::Subscriptions->find($subscriptionid);
+    $subscription = Koha::Subscriptions->find($subscriptionid);
     $subscription->permanent_irregularity(join(';', @permanent_irregularities));
     $subscription->irregularity(join(';', @irregularities));
     $subscription->store;
-- 
2.11.0