projects
/
koha-ffzg.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 32030: Max document file size - client-side validation
[koha-ffzg.git]
/
Koha
/
PseudonymizedTransaction.pm
diff --git
a/Koha/PseudonymizedTransaction.pm
b/Koha/PseudonymizedTransaction.pm
index
4af9116
..
70049a4
100644
(file)
--- a/
Koha/PseudonymizedTransaction.pm
+++ b/
Koha/PseudonymizedTransaction.pm
@@
-16,8
+16,7
@@
package Koha::PseudonymizedTransaction;
use Modern::Perl;
use Modern::Perl;
-use Carp;
-use Crypt::Eksblowfish::Bcrypt qw(bcrypt en_base64);
+use Crypt::Eksblowfish::Bcrypt qw( bcrypt );
use Koha::Database;
use Koha::Exceptions::Config;
use Koha::Database;
use Koha::Exceptions::Config;
@@
-103,18
+102,18
@@
sub new_from_statistic {
=head3 get_hash
Generates a hashed value for $s (e.g. borrowernumber) with Bcrypt.
=head3 get_hash
Generates a hashed value for $s (e.g. borrowernumber) with Bcrypt.
- Needs config entry '
key
' in koha-conf.
+ Needs config entry '
bcrypt_settings
' in koha-conf.
=cut
sub get_hash {
my ( $class, $s ) = @_;
=cut
sub get_hash {
my ( $class, $s ) = @_;
- my $
key = C4::Context->config('key
');
+ my $
bcrypt_settings = C4::Context->config('bcrypt_settings
');
Koha::Exceptions::Config::MissingEntry->throw(
Koha::Exceptions::Config::MissingEntry->throw(
- "Missing '
key' entry in config file") unless $key
;
+ "Missing '
bcrypt_settings' entry in config file") unless $bcrypt_settings
;
- return bcrypt($s, $
key
);
+ return bcrypt($s, $
bcrypt_settings
);
}
=head2 Internal methods
}
=head2 Internal methods