@@ -, +, @@ --- misc/devel/create_superlibrarian.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) --- a/misc/devel/create_superlibrarian.pl +++ a/misc/devel/create_superlibrarian.pl @@ -40,7 +40,7 @@ pod2usage("branchcode is mandatory") unless $branchcode; pod2usage("categorycode is mandatory") unless $categorycode; pod2usage("cardnumber is mandatory") unless $cardnumber; -Koha::Patron->new({ +my $patron = Koha::Patron->new({ surname => $surname, userid => $userid, cardnumber => $cardnumber, @@ -50,6 +50,9 @@ Koha::Patron->new({ flags => 1, })->store; +my $digest = Koha::AuthUtils::hash_password($password); +$patron->update({password => $digest,}); + =head1 NAME create_superlibrarian.pl - create a user in Koha with superlibrarian permissions --