View | Details | Raw Unified | Return to bug 16886
Collapse All | Expand All

(-)a/tools/picture-upload.pl (-4 / +5 lines)
Lines 46-54 my ($template, $loggedinuser, $cookie) Link Here
46
					debug => 0,
46
					debug => 0,
47
					});
47
					});
48
48
49
my $filetype       = $input->param('filetype');
49
our $filetype      = $input->param('filetype') || '';
50
my $cardnumber     = $input->param('cardnumber');
50
my $cardnumber     = $input->param('cardnumber');
51
my $uploadfilename = $input->param('uploadfile');
51
our $uploadfilename = $input->param('uploadfile') || '';
52
my $uploadfile     = $input->upload('uploadfile');
52
my $uploadfile     = $input->upload('uploadfile');
53
my $borrowernumber = $input->param('borrowernumber');
53
my $borrowernumber = $input->param('borrowernumber');
54
my $op             = $input->param('op') || '';
54
my $op             = $input->param('op') || '';
Lines 76-82 Files greater than 100K will be refused. Images should be 140x200 pixels. If the Link Here
76
76
77
$debug and warn "Operation requested: $op";
77
$debug and warn "Operation requested: $op";
78
78
79
my ( $total, $handled, @counts, $tempfile, $tfh, %errors );
79
my ( $total, $handled, $tempfile, $tfh );
80
our @counts = ();
81
our %errors = ();
80
82
81
# Case is important in these operational values as the template must use case to be visually pleasing!
83
# Case is important in these operational values as the template must use case to be visually pleasing!
82
if ( ( $op eq 'Upload' ) && $uploadfile ) {
84
if ( ( $op eq 'Upload' ) && $uploadfile ) {
83
- 

Return to bug 16886