percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-04 03:26:19 +00:00
Code Issues Packages Projects Releases Wiki Activity

PT-1448 Updated test for pt-show-grant MySQL 8 support

Browse Source
This commit is contained in:
Carlos Salguero
2018-03-30 20:08:04 -03:00
parent cec7e7d052
commit cc99db8ddd
2 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
bin/pt-show-grants
View File

@@ -1922,7 +1922,8 @@ sub main {
my $ignore_users = $o->get('ignore');
my $exit_status = 0;
if (my $roles = get_roles($dbh)) {
my $roles = get_roles($dbh);
if ($roles && scalar @$roles > 0) {
print "-- Roles\n";
my $count=0;
@@ -1940,7 +1941,7 @@ sub main {
USER:
foreach my $u ( @$users ) {
my $user_host = "`$u->{User}`\@`$u->{Host}`";
my $user_host = "'$u->{User}'\@'$u->{Host}'";
if ( $ignore_users && $ignore_users->{$user_host} ) {
PTDEBUG && _d('Ignoring user', $user_host);
next USER;
@@ -2115,7 +2116,6 @@ __EOQ
my $roles;
eval { $roles = $dbh->selectall_arrayref($query, { Slice => {} }) };
if ($EVAL_ERROR) {
warn "Cannot list roles: $EVAL_ERROR";
PTDEBUG && _d("Cannot list roles: $EVAL_ERROR");
}
return $roles;