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

(-)a/tools/import_borrowers.pl (-3 / +2 lines)
Lines 102-115 if ($matchpoint) { Link Here
102
my $createpatronlist = $input->param('createpatronlist') || 0;
102
my $createpatronlist = $input->param('createpatronlist') || 0;
103
my $dt               = dt_from_string();
103
my $dt               = dt_from_string();
104
my $timestamp        = $dt->ymd('-') . ' ' . $dt->hms(':');
104
my $timestamp        = $dt->ymd('-') . ' ' . $dt->hms(':');
105
my $patronlistname   = $uploadborrowers . ' (' . $timestamp . ')';
106
105
107
if ( $op eq 'cud-import' && $uploadborrowers && length($uploadborrowers) > 0 ) {
106
if ( $op eq 'cud-import' && $uploadborrowers && length($uploadborrowers) > 0 ) {
108
107
108
    my $patronlistname      = $uploadborrowers . ' (' . $timestamp . ')';
109
    my $handle              = $input->upload('uploadborrowers');
109
    my $handle              = $input->upload('uploadborrowers');
110
    my %defaults            = $input->Vars;
110
    my %defaults            = $input->Vars;
111
    my $overwrite_passwords = defined $input->param('overwrite_passwords') ? 1 : 0;
111
    my $overwrite_passwords = defined $input->param('overwrite_passwords') ? 1 : 0;
112
    my $update_dateexpiry   = $input->param('update_dateexpiry');
112
    my $update_dateexpiry   = $input->param('update_dateexpiry') // "";
113
    my $return              = $Import->import_patrons(
113
    my $return              = $Import->import_patrons(
114
        {
114
        {
115
            file                            => $handle,
115
            file                            => $handle,
116
- 

Return to bug 40549