gozer 2004/08/13 21:36:09
Modified: t/response/TestDirective cmdparms.pm
Log:
More small whitespace fixes
Revision Changes Path
1.4 +14 -14 modperl-2.0/t/response/TestDirective/cmdparms.pm
Index: cmdparms.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/response/TestDirective/cmdparms.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- cmdparms.pm 14 Aug 2004 04:29:50 -0000 1.3
+++ cmdparms.pm 14 Aug 2004 04:36:09 -0000 1.4
@@ -62,14 +62,14 @@
plan $r, tests => 6 + ( 8 * keys(%$srv_cfg) );
foreach my $cfg (values %$srv_cfg) {
- ok t_cmp (ref($cfg->{cmd}), 'Apache::Command', 'cmd');
- ok t_cmp (ref($cfg->{context}), 'Apache::ConfVector', 'context');
- ok t_cmp (ref($cfg->{directive}), 'Apache::Directive', 'directive');
- ok t_cmp (ref($cfg->{pool}), 'APR::Pool', 'pool');
- ok t_cmp (ref($cfg->{temp_pool}), 'APR::Pool', 'temp_pool');
- ok t_cmp (ref($cfg->{server}), 'Apache::ServerRec', 'server');
- ok t_cmp ($cfg->{limited}, -1, 'limited');
- ok t_cmp ($cfg->{info}, 'cmd_data', 'cmd_data');
+ ok t_cmp(ref($cfg->{cmd}), 'Apache::Command', 'cmd');
+ ok t_cmp(ref($cfg->{context}), 'Apache::ConfVector', 'context');
+ ok t_cmp(ref($cfg->{directive}), 'Apache::Directive', 'directive');
+ ok t_cmp(ref($cfg->{pool}), 'APR::Pool', 'pool');
+ ok t_cmp(ref($cfg->{temp_pool}), 'APR::Pool', 'temp_pool');
+ ok t_cmp(ref($cfg->{server}), 'Apache::ServerRec', 'server');
+ ok t_cmp($cfg->{limited}, -1, 'limited');
+ ok t_cmp($cfg->{info}, 'cmd_data', 'cmd_data');
}
my $vhost = $srv_cfg->{Vhost};
@@ -79,9 +79,9 @@
Apache::OR_FILEINFO |
Apache::OR_OPTIONS;
- ok t_cmp ($vhost->{override}, $override, 'override');
- ok t_cmp ($vhost->{path}, undef, 'path');
- ok t_cmp ($vhost->{check_ctx}, undef, 'check_cmd_ctx');
+ ok t_cmp($vhost->{override}, $override, 'override');
+ ok t_cmp($vhost->{path}, undef, 'path');
+ ok t_cmp($vhost->{check_ctx}, undef, 'check_cmd_ctx');
my $loc = $srv_cfg->{Location};
@@ -92,9 +92,9 @@
Apache::OR_OPTIONS |
Apache::OR_LIMIT;
- ok t_cmp ($loc->{override}, $override, 'override');
- ok t_cmp ($loc->{path}, '/TestDirective__cmdparms', 'path');
- ok t_cmp ($loc->{check_ctx}, KEY .
+ ok t_cmp($loc->{override}, $override, 'override');
+ ok t_cmp($loc->{path}, '/TestDirective__cmdparms', 'path');
+ ok t_cmp($loc->{check_ctx}, KEY .
' cannot occur within <Location> section', 'check_cmd_ctx');
return Apache::OK;