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 Carp;
-use Crypt::Eksblowfish::Bcrypt qw(bcrypt en_base64);
+use Crypt::Eksblowfish::Bcrypt qw( bcrypt );
 
 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.
-    Needs config entry 'key' in koha-conf.
+    Needs config entry 'bcrypt_settings' in koha-conf.
 
 =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(
-        "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