cvs commit: modperl-2.0/t/modperl setupenv.t

[stas]

stas        2004/03/08 16:18:04

  Modified:    t/modperl setupenv.t
  Log:
  skip this test if lwp is not available
  
  Revision  Changes    Path
  1.2       +4 -0      modperl-2.0/t/modperl/setupenv.t
  
  Index: setupenv.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/modperl/setupenv.t,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -u -r1.1 -r1.2
  --- setupenv.t        12 Feb 2004 23:06:24 -0000      1.1
  +++ setupenv.t        9 Mar 2004 00:18:04 -0000       1.2
  @@ -31,6 +31,10 @@
   #
   # this requires keepalives and a per-connection interpreter
   # to make certain we can plan in one request and test in another
  +# which requires LWP
  +unless (have_lwp()) {
  +    plan tests => 63, 0;
  +}
   
   Apache::TestRequest::user_agent(keep_alive => 1);
   print GET_BODY_ASSERT join '?', $base, scalar @locations;