|
Lines 33-39
my $borrowernumber = $cgi->param('borrowernumber');
Link Here
|
| 33 |
my $action = $cgi->param('action'); |
33 |
my $action = $cgi->param('action'); |
| 34 |
|
34 |
|
| 35 |
if ( $action eq 'del' ) { |
35 |
if ( $action eq 'del' ) { |
| 36 |
DelDebarment( $cgi->param('borrower_debarment_id') ); |
36 |
DelDebarment( scalar $cgi->param('borrower_debarment_id') ); |
| 37 |
} elsif ( $action eq 'add' ) { |
37 |
} elsif ( $action eq 'add' ) { |
| 38 |
my $expiration = $cgi->param('expiration'); |
38 |
my $expiration = $cgi->param('expiration'); |
| 39 |
if ($expiration) { |
39 |
if ($expiration) { |
| 40 |
- |
|
|