cvs commit: modperl-2.0/t/modules cgiupload2.t cgiupload.t

[stas]

stas        2004/02/22 18:07:32

  Modified:    t/modules cgiupload2.t cgiupload.t
  Log:
  yet another correction due to moving A-T cwd out of t/
  
  Revision  Changes    Path
  1.2       +3 -1      modperl-2.0/t/modules/cgiupload2.t
  
  Index: cgiupload2.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/modules/cgiupload2.t,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -u -r1.1 -r1.2
  --- cgiupload2.t      7 Nov 2003 08:52:44 -0000       1.1
  +++ cgiupload2.t      23 Feb 2004 02:07:32 -0000      1.2
  @@ -6,6 +6,8 @@
   use Apache::TestRequest;
   use Apache::Build ();
   
  +use File::Spec::Functions qw(catfile);
  +
   my $build = Apache::Build->build_config;
   plan tests => 2, have have_lwp(),
       have_min_module_version(CGI => 3.01);
  @@ -22,7 +24,7 @@
       }
   }
   
  -$filename ||= '../Makefile';
  +$filename ||= catfile Apache::Test::vars('serverroot'), "..", 'Makefile';
   
   for (1,2) {
       my $str = UPLOAD_BODY $location, filename => $filename;
  
  
  
  1.10      +3 -1      modperl-2.0/t/modules/cgiupload.t
  
  Index: cgiupload.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/modules/cgiupload.t,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -u -u -r1.9 -r1.10
  --- cgiupload.t       22 Nov 2003 21:37:14 -0000      1.9
  +++ cgiupload.t       23 Feb 2004 02:07:32 -0000      1.10
  @@ -6,6 +6,8 @@
   use Apache::TestRequest;
   use Apache::Build ();
   
  +use File::Spec::Functions qw(catfile);
  +
   my $build = Apache::Build->build_config;
   plan tests => 2, have have_lwp(), have have_min_module_version('CGI', 2.93),
       {"MP_COMPAT_1X is disabled" => $build->{MP_COMPAT_1X}};
  @@ -22,7 +24,7 @@
       }
   }
   
  -$filename ||= '../Makefile';
  +$filename ||= catfile Apache::Test::vars('serverroot'), "..", 'Makefile';
   
   for (1,2) {
       my $str = UPLOAD_BODY $location, filename => $filename;