From 3cb50795de44054049611cc570bf87634583079e Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Mon, 23 Nov 2015 13:56:36 -0500 Subject: [PATCH] LP#1468422 Admin seed data sets new-style passwd Signed-off-by: Bill Erickson Signed-off-by: Dan Wells --- Open-ILS/src/support-scripts/eg_db_config.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/support-scripts/eg_db_config.in b/Open-ILS/src/support-scripts/eg_db_config.in index 2d0bd3b050..b59d044b86 100755 --- a/Open-ILS/src/support-scripts/eg_db_config.in +++ b/Open-ILS/src/support-scripts/eg_db_config.in @@ -240,7 +240,7 @@ sub set_admin_account { # Create a new salt, perform MD5 hashing, set the new password. $stmt = $dbh->prepare("SELECT actor.create_salt('main') AS new_salt"); $stmt->execute; - my $new_salt = $stmt->selectrow_hashref->{new_salt}; + my $new_salt = $dbh->selectrow_hashref($stmt)->{new_salt}; $stmt = $dbh->prepare( "SELECT actor.set_passwd(1, 'main', MD5(? || MD5(?)), ?)"); -- 2.11.0