diff --git a/lib/NGCP/Cleanup.pm b/lib/NGCP/Cleanup.pm index 412cbcd..4da2975 100644 --- a/lib/NGCP/Cleanup.pm +++ b/lib/NGCP/Cleanup.pm @@ -106,8 +106,8 @@ sub init_cmds { connect => sub { my ($self, $db) = @_; my $host = $self->env('host'); - my $user = $self->env('user'); - my $pass = $self->env('pass'); + my $user = $self->env('user') // $self->env('username'); + my $pass = $self->env('pass') // $self->env('password'); my $dbi = "dbi:mysql:$db;host=$host"; my $dbh = DBI->connect($dbi, $user, $pass, { PrintError => 0, mysql_auto_reconnect => 1 }) @@ -542,8 +542,8 @@ sub archive_dump { my $month = $self->env('archive-months'); my $target = $self->env('archive-target'); my $compress = $self->env('compress'); - my $user = $self->env('username'); - my $pass = $self->env('password'); + my $user = $self->env('user') // $self->env('username'); + my $pass = $self->env('pass') // $self->env('password'); my $host = $self->env('host'); while (1) {