diff options
Diffstat (limited to 'qa/t/webservice_jsonp.t')
-rw-r--r-- | qa/t/webservice_jsonp.t | 25 |
1 files changed, 16 insertions, 9 deletions
diff --git a/qa/t/webservice_jsonp.t b/qa/t/webservice_jsonp.t index 53b23aaf2..8aa72a145 100644 --- a/qa/t/webservice_jsonp.t +++ b/qa/t/webservice_jsonp.t @@ -12,19 +12,26 @@ use Test::More tests => 85; use QA::Util; my $jsonrpc_get = QA::Util::get_jsonrpc_client('GET'); -my @chars = (0..9, 'A'..'Z', 'a'..'z', '_[].'); +my @chars = (0 .. 9, 'A' .. 'Z', 'a' .. 'z', '_[].'); our @tests = ( - { args => { callback => join('', @chars) }, - test => 'callback accepts all legal characters.' }, + { + args => {callback => join('', @chars)}, + test => 'callback accepts all legal characters.' + }, ); -foreach my $char (qw(! ~ ` @ $ % ^ & * - + = { } ; : ' " < > / ? |), - '(', ')', '\\', '#', ',') +foreach + my $char (qw(! ~ ` @ $ % ^ & * - + = { } ; : ' " < > / ? |), '(', ')', '\\', + '#', ',') { - push(@tests, - { args => { callback => "a$char" }, - error => "as your 'callback' parameter", - test => "$char is not valid in callback" }); + push( + @tests, + { + args => {callback => "a$char"}, + error => "as your 'callback' parameter", + test => "$char is not valid in callback" + } + ); } $jsonrpc_get->bz_run_tests(method => 'Bugzilla.version', tests => \@tests); |