X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=tools%2Fimport_borrowers.pl;h=a7e9142d711a8f378bd6dd0764e4898efb58ba98;hb=7650a34754d5265a749c070228ad04b397d3cf3a;hp=74a58895dd0c83dee5bd5ee8f2af02fc8be28c51;hpb=a118102d4e2d7cf6bc1157a560c52fd6deb6f7a7;p=koha_gimpoz diff --git a/tools/import_borrowers.pl b/tools/import_borrowers.pl index 74a58895dd..a7e9142d71 100755 --- a/tools/import_borrowers.pl +++ b/tools/import_borrowers.pl @@ -243,6 +243,10 @@ if ( $uploadborrowers && length($uploadborrowers) > 0 ) { for my $col (keys %borrower) { # use values from extant patron unless our csv file includes this column or we provided a default. # FIXME : You cannot update a field with a perl-evaluated false value using the defaults. + + # The password is always encrypted, skip it! + next if $col eq 'password'; + unless(exists($csvkeycol{$col}) || $defaults{$col}) { $borrower{$col} = $member->{$col} if($member->{$col}) ; }