stas 2004/04/12 11:09:14
Modified: perl-framework/Apache-Test/lib/Apache TestUtil.pm Log: actually in this case () aren't needed Revision Changes Path 1.36 +1 -3 httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm Index: TestUtil.pm =================================================================== RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm,v retrieving revision 1.35 retrieving revision 1.36 diff -u -u -r1.35 -r1.36 --- TestUtil.pm 12 Apr 2004 18:02:15 -0000 1.35 +++ TestUtil.pm 12 Apr 2004 18:09:14 -0000 1.36 @@ -444,9 +444,7 @@ or use a scalar context: - t_cmp($expected, scalar(foo()), "may return undef") - -the parentheses for the C<scalar()>'s expression are mandatory here. + t_cmp($expected, scalar foo(), "may return undef") This function is exported by default.