percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-09 18:30:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

Remove XXX hack from pqd that makes it write every thing it reads to /tmp/slow.log* files.

Browse Source
This commit is contained in:
Daniel Nichter
2013-06-11 18:49:38 -07:00
parent 55ef1abacf
commit a424b212fd
1 changed files with 3 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
bin/pt-query-digest
View File

@@ -13739,12 +13739,7 @@ sub main {
}
} # sample
# XXX
# if ( $o->get('output') =~ /slowlog/i ) {
my $utc_ts = ts(time, 1);
$utc_ts =~ s/:/_/g;
my $events_file = "/tmp/slow.log-$utc_ts";
open my $events_fh, '>', $events_file or die "Cannot open $events_file: $OS_ERROR";
if ( $o->get('output') =~ /slowlog/i ) {
my $w = new SlowLogWriter();
$pipeline->add(
name => '--output slowlog',
@@ -13752,11 +13747,11 @@ open my $events_fh, '>', $events_file or die "Cannot open $events_file: $OS_ERRO
my ( $args ) = @_;
my $event = $args->{event};
PTDEBUG && _d('callback: --output slowlog');
$w->write($events_fh, $event);
$w->write(*STDOUT, $event);
return $args;
},
);
# } # print
} # print
# Finally, add aggregator obj for each groupby attrib to the callbacks.
# These aggregating objs should be the last pipeline processes.