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

Fix typo in run_services(). Print random stuff on STDERR as warnings.

Browse Source
This commit is contained in:
Daniel Nichter
2013-06-10 20:11:03 -07:00
parent 8641d55a4e
commit 4db9aac13b
2 changed files with 2 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
bin/pt-agent
View File

@@ -4925,7 +4925,7 @@ sub start_online_logging {
while ( defined(my $line = shift @$lines) ) {
my ($ts, $level, $n_lines, $msg) = $line =~ m/^([^,]+),([^,]+),([^,]+),(.+)/s;
if ( !$ts || !$level || !$n_lines || !$msg ) {
warn "Invalid log entry: $line\n";
warn "$line\n";
next LINE;
}
if ( $n_lines > 1 ) {
@@ -6570,12 +6570,10 @@ sub make_new_crontab {
sub run_services {
my (%args) = @_;
have_required_args(\%args, qw(
api_key
action
services
lib_dir
)) or die;
my $api_key = $args{api_key};
my $action = $args{action};
my $services = $args{services};
my $lib_dir = $args{lib_dir};