Lines 70-76
my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
Link Here
|
70 |
my @branch = $query->multi_param("branch"); |
70 |
my @branch = $query->multi_param("branch"); |
71 |
|
71 |
|
72 |
my @messages; |
72 |
my @messages; |
73 |
if ( $op eq 'export' ) { |
73 |
if ( $op eq 'export' & $query->param('id_list_file') ) { |
74 |
my $filename = $query->param('id_list_file'); |
74 |
my $filename = $query->param('id_list_file'); |
75 |
my $mimetype = $query->uploadInfo($filename)->{'Content-Type'}; |
75 |
my $mimetype = $query->uploadInfo($filename)->{'Content-Type'}; |
76 |
my @valid_mimetypes = qw( application/octet-stream text/csv text/plain ); |
76 |
my @valid_mimetypes = qw( application/octet-stream text/csv text/plain ); |
77 |
- |
|
|