Lines 46-56
my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( {
Link Here
|
46 |
|
46 |
|
47 |
my $op = $input->param('op'); |
47 |
my $op = $input->param('op'); |
48 |
|
48 |
|
49 |
if($op && ($op eq 'new' || $op eq 'cud-modify')) { |
49 |
if($op && ($op eq 'new' || $op eq 'modify')) { |
50 |
my @units_loop; |
50 |
my @units_loop; |
51 |
push @units_loop, {val => $_} for (qw/ day week month year /); |
51 |
push @units_loop, {val => $_} for (qw/ day week month year /); |
52 |
|
52 |
|
53 |
if($op eq 'cud-modify') { |
53 |
if($op eq 'modify') { |
54 |
my $frequencyid = $input->param('frequencyid'); |
54 |
my $frequencyid = $input->param('frequencyid'); |
55 |
my $frequency = GetSubscriptionFrequency($frequencyid); |
55 |
my $frequency = GetSubscriptionFrequency($frequencyid); |
56 |
foreach (@units_loop) { |
56 |
foreach (@units_loop) { |
57 |
- |
|
|