diff --git a/lib/MasterSlave.pm b/lib/MasterSlave.pm index caf527d4..f4d6a95a 100644 --- a/lib/MasterSlave.pm +++ b/lib/MasterSlave.pm @@ -364,7 +364,9 @@ sub get_master_status { MKDEBUG && _d($dbh, 'SHOW MASTER STATUS'); $sth->execute(); my ($ms) = @{$sth->fetchall_arrayref({})}; - MKDEBUG && _d(@$ms); + MKDEBUG && _d( + $ms ? map { "$_=" . (defined $ms->{$_} ? $ms->{$_} : '') } keys %$ms + : ''); if ( !$ms || scalar keys %$ms < 2 ) { MKDEBUG && _d('Server on dbh', $dbh, 'does not seem to be a master');