Context Navigation

controller_Chat-Cmd.t @ 158

Last change on this file since 158 was 158, checked in by nanardon, 13 years ago
factorize xml::rpc test code add functions to test xml::rpc results (ie xml::rpc error code)
File size: 350 bytes

Line
1	use strict;
2	use warnings;
3	use Test::More;
4	use FindBin;
5	require "$FindBin::Bin/xml.pl";
6
7	BEGIN { use_ok 'Catalyst::Test', 'Sophie' }
8	BEGIN { use_ok 'Sophie::Controller::Chat::Cmd' }
9
10	foreach (qw(version v packager p arch a buildfrom)) {
11	ok(
12	xmlrequest_ok("chat.cmd.$_", {}, "rpm"),
13	"XML::RPC chat.cmd.$_"
14	);
15	}
16
17	done_testing();

Note: See TracBrowser for help on using the repository browser.