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

Queue buffered log entries when destroyed.

Browse Source
This commit is contained in:
Daniel Nichter
2013-06-09 17:33:01 -07:00
parent 0b16c02468
commit aadb5dbd80
2 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
bin/pt-agent
View File

@@ -5066,6 +5066,10 @@ sub stop_online_logging {
sub DESTROY {
my $self = shift;
foreach my $log_entry ( shift @{$self->_buffer} ) {
last unless defined $log_entry;
$self->_queue_log_entry(@$log_entry);
}
$self->stop_online_logging();
return;
}

4
lib/Percona/Agent/Logger.pm
View File

@@ -282,6 +282,10 @@ sub stop_online_logging {
sub DESTROY {
my $self = shift;
foreach my $log_entry ( shift @{$self->_buffer} ) {
last unless defined $log_entry;
$self->_queue_log_entry(@$log_entry);
}
$self->stop_online_logging();
return;
}