cvs commit: modperl-2.0/src/modules/perl modperl_error.c

[stas]

stas        2004/07/07 23:59:38

  Modified:    src/modules/perl modperl_error.c
  Log:
  temp workaround for t/filter/TestFilter/in_error.pm
  
  Revision  Changes    Path
  1.4       +2 -0      modperl-2.0/src/modules/perl/modperl_error.c
  
  Index: modperl_error.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_error.c,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -u -r1.3 -r1.4
  --- modperl_error.c   16 Jun 2004 03:55:47 -0000      1.3
  +++ modperl_error.c   8 Jul 2004 06:59:38 -0000       1.4
  @@ -55,10 +55,12 @@
       HV *data;
   
       /* XXX: it'd be nice to arrange for it to load early */
  +    /* XXX: temp loaded from startup.pl
       Perl_require_pv(aTHX_ "APR/Error.pm");
       if (SvTRUE(ERRSV)) {
           Perl_croak(aTHX_ "%s", SvPV_nolen(ERRSV));   
       }
  +    */
       
       stash = gv_stashpvn("APR::Error", 10, FALSE);
       data = newHV();