From eec6b41c3fe17eefb01c83a9164d7ef8d56d5fe3 Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien@koha-fr.org>
Date: Fri, 16 Nov 2007 17:55:28 +0100
Subject: [PATCH] numberingpattern was disimissed when editing a subscription

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 serials/subscription-add.pl | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

diff --git a/serials/subscription-add.pl b/serials/subscription-add.pl
index f9e5e468ac..2388e97548 100755
--- a/serials/subscription-add.pl
+++ b/serials/subscription-add.pl
@@ -150,18 +150,12 @@ if ($op eq 'mod'||$op eq 'dup') {
             );
     $template->param(
                 "periodicity".$subs->{'periodicity'} => 1,
-                "dow".$subs->{'periodicity'} => 1,
-                "numberpattern".$subs->{'periodicity'} => 1,
+                "dow".$subs->{'dow'} => 1,
+                "numberpattern".$subs->{'numberpattern'} => 1,
                 );
 }
 
 if ($op eq 'addsubscription') {
-    my @irregular = $query->param('irregular');
-    my $irregular_count = scalar(@irregular);
-    for(my $i =0;$i<$irregular_count;$i++){
-        $irregularity .=$irregular[$i].",";
-    }
-    $irregularity =~ s/\,$//;
 
     my $auser = $query->param('user');
     my $branchcode = $query->param('branchcode');
-- 
2.39.5