Fix Lmo::Types in pt-agent. Change Run->queries to query, Maybe[Str].

This commit is contained in:
Daniel Nichter
2013-01-17 18:21:02 -07:00
parent 4c48ed16a5
commit f999686610
2 changed files with 6 additions and 4 deletions

View File

@@ -16,6 +16,7 @@ BEGIN {
Percona::Toolkit Percona::Toolkit
Lmo::Meta Lmo::Meta
Lmo::Object Lmo::Object
Lmo::Types
Lmo Lmo
Percona::WebAPI::Representation Percona::WebAPI::Representation
Percona::WebAPI::Client Percona::WebAPI::Client
@@ -279,6 +280,7 @@ sub meta {
# See https://launchpad.net/percona-toolkit for more information. # See https://launchpad.net/percona-toolkit for more information.
# ########################################################################### # ###########################################################################
{ {
package Lmo::Types;
use strict; use strict;
use warnings qw( FATAL all ); use warnings qw( FATAL all );
@@ -1283,9 +1285,9 @@ has 'options' => (
required => 0, required => 0,
); );
has 'queries' => ( has 'query' => (
is => 'ro', is => 'ro',
isa => 'Maybe[ArrayRef]', isa => 'Maybe[Str]',
required => 0, required => 0,
default => undef, default => undef,
); );

View File

@@ -40,9 +40,9 @@ has 'options' => (
required => 0, required => 0,
); );
has 'queries' => ( has 'query' => (
is => 'ro', is => 'ro',
isa => 'Maybe[ArrayRef]', isa => 'Maybe[Str]',
required => 0, required => 0,
default => undef, default => undef,
); );