perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: modperl-2.0/t/response/TestModperl exit.pm
Date Mon, 08 Oct 2001 23:45:01 GMT
dougm       01/10/08 16:45:01

  Modified:    t/modperl .cvsignore
  Added:       t/response/TestModperl exit.pm
  Log:
  add test for ModPerl::Util::exit
  
  Revision  Changes    Path
  1.2       +1 -0      modperl-2.0/t/modperl/.cvsignore
  
  Index: .cvsignore
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/modperl/.cvsignore,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- .cvsignore	2001/10/08 20:37:33	1.1
  +++ .cvsignore	2001/10/08 23:45:01	1.2
  @@ -1 +1,2 @@
   endav.t
  +exit.t
  
  
  
  1.1                  modperl-2.0/t/response/TestModperl/exit.pm
  
  Index: exit.pm
  ===================================================================
  package TestModperl::exit;
  
  use strict;
  use warnings FATAL => 'all';
  
  use Apache::Test;
  use ModPerl::Util ();
  
  sub handler {
      my $r = shift;
  
      plan $r, test => 1;
  
      ok 1;
  
      ModPerl::Util::exit();
  
      #not reached
      ok 2;
  
      Apache::OK;
  }
  
  1;
  __END__
  
  
  
  

Mime
View raw message