mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-16 00:03:02 +00:00
Fix HTTPMicro POST: attach content to request. Validate type.
This commit is contained in:
@@ -174,6 +174,27 @@ ok(
|
||||
"Newline stripped from OS"
|
||||
);
|
||||
|
||||
|
||||
# #############################################################################
|
||||
# Validate items
|
||||
# #############################################################################
|
||||
|
||||
my $versions = $vc->get_versions(
|
||||
items => {
|
||||
'Foo' => {
|
||||
item => 'Foo',
|
||||
type => 'perl_variable',
|
||||
vars => [],
|
||||
},
|
||||
},
|
||||
);
|
||||
|
||||
is_deeply(
|
||||
$versions,
|
||||
{},
|
||||
"perl_variable is not a valid type"
|
||||
);
|
||||
|
||||
# #############################################################################
|
||||
# Done.
|
||||
# #############################################################################
|
||||
|
Reference in New Issue
Block a user