diff options
Diffstat (limited to 'config-db/OpenSLX')
| -rw-r--r-- | config-db/OpenSLX/MetaDB/mysql.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/config-db/OpenSLX/MetaDB/mysql.pm b/config-db/OpenSLX/MetaDB/mysql.pm index 865b035d..6b298bc8 100644 --- a/config-db/OpenSLX/MetaDB/mysql.pm +++ b/config-db/OpenSLX/MetaDB/mysql.pm @@ -24,6 +24,7 @@ use base qw(OpenSLX::MetaDB::DBI); ################################################################################ use DBD::mysql; use OpenSLX::Basics; +use OpenSLX::Utils; ################################################################################ ### implementation @@ -50,11 +51,7 @@ sub connect ## no critic (ProhibitBuiltinHomonyms) : (getpwuid($>))[0]; my $dbPasswd = $openslxConfig{'db-passwd'}; if (!defined $dbPasswd) { - use Term::ReadLine; - my $term = Term::ReadLine->new('slx'); - my $attribs = $term->Attribs; - $attribs->{redisplay_function} = $attribs->{shadow_redisplay}; - $dbPasswd = $term->readline("db-password> "); + $dbPasswd = readPassword("db-password> "); } vlog(1, "trying to connect user '$dbUser' to mysql-database '$dbSpec'"); |