From e0e1d562e8e5a686c1fcd29d31b491ee6e74777f Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sgunderson@bigfoot.com>
Date: Fri, 6 Jul 2018 14:22:56 +0200
Subject: [PATCH 1/1] Modernize the Bcrypt demands.

---
 perl/mkpasswd.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/mkpasswd.pl b/perl/mkpasswd.pl
index 5d6aac3..44db3ed 100755
--- a/perl/mkpasswd.pl
+++ b/perl/mkpasswd.pl
@@ -19,6 +19,6 @@ print STDERR "\n";
 Term::ReadKey::ReadMode(0);
 
 my $salt = Sesse::pr0n::Common::get_pseudorandom_bytes(16);  # Doesn't need to be cryptographically secur.
-my $hash = "\$2a\$07\$" . Crypt::Eksblowfish::Bcrypt::en_base64($salt);
+my $hash = "\$2a\$08\$" . Crypt::Eksblowfish::Bcrypt::en_base64($salt);
 print Crypt::Eksblowfish::Bcrypt::bcrypt($pass, $hash), "\n";
 
-- 
2.39.2