summaryrefslogtreecommitdiffstats
path: root/qa/t/webservice_bug_history.t
diff options
context:
space:
mode:
Diffstat (limited to 'qa/t/webservice_bug_history.t')
-rw-r--r--qa/t/webservice_bug_history.t13
1 files changed, 8 insertions, 5 deletions
diff --git a/qa/t/webservice_bug_history.t b/qa/t/webservice_bug_history.t
index 7451fe450..7accacfd6 100644
--- a/qa/t/webservice_bug_history.t
+++ b/qa/t/webservice_bug_history.t
@@ -18,12 +18,15 @@ use Test::More tests => 114;
my ($config, @clients) = get_rpc_clients();
sub post_success {
- my ($call, $t) = @_;
- is(scalar @{ $call->result->{bugs} }, 1, "Got exactly one bug");
- isa_ok($call->result->{bugs}->[0]->{history}, 'ARRAY', "Bug's history");
+ my ($call, $t) = @_;
+ is(scalar @{$call->result->{bugs}}, 1, "Got exactly one bug");
+ isa_ok($call->result->{bugs}->[0]->{history}, 'ARRAY', "Bug's history");
}
foreach my $rpc (@clients) {
- $rpc->bz_run_tests(tests => STANDARD_BUG_TESTS,
- method => 'Bug.history', post_success => \&post_success);
+ $rpc->bz_run_tests(
+ tests => STANDARD_BUG_TESTS,
+ method => 'Bug.history',
+ post_success => \&post_success
+ );
}