httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache Test.pm
Date Mon, 12 Nov 2001 03:06:25 GMT
stas        01/11/11 19:06:25

  Modified:    perl-framework/Apache-Test/lib/Apache Test.pm
  Log:
  - document skip_unless()
  
  Revision  Changes    Path
  1.32      +17 -0     httpd-test/perl-framework/Apache-Test/lib/Apache/Test.pm
  
  Index: Test.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/Test.pm,v
  retrieving revision 1.31
  retrieving revision 1.32
  diff -u -r1.31 -r1.32
  --- Test.pm	2001/11/09 18:01:53	1.31
  +++ Test.pm	2001/11/12 03:06:25	1.32
  @@ -299,6 +299,13 @@
   
     plan tests => 5, 0;
   
  +But this won't hint the reason for skipping therefore it's better to
  +use skip_unless():
  +
  +  plan tests => 5, skip_unless(sub { $a == $b }, "$a != $b");
  +
  +see skip_unless() for more info.
  +
   =item * an C<ARRAY> reference
   
   have_module() is called for each value in this array. The test is
  @@ -336,6 +343,16 @@
   =item skip
   
   Same as I<Test::skip>, see I<Test.pm> documentation.
  +
  +=item skip_unless
  +
  +  skip_unless($cond_sub, $reason);
  +
  +skip_unless() is used with plan(), it executes C<$cond_sub> code
  +reference and if it returns a false value C<$reason> gets printed as a
  +reason for test skipping.
  +
  +see plan().
   
   =item test_pm_refresh
   
  
  
  

Mime
View raw message