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

[stas]

stas        2003/11/01 01:25:02

  Modified:    src/modules/perl modperl_io_apache.c
  Log:
  provide a more desriptive error message when :Apache layer fails to be
  pushed
  
  Revision  Changes    Path
  1.8       +2 -1      modperl-2.0/src/modules/perl/modperl_io_apache.c
  
  Index: modperl_io_apache.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_io_apache.c,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -u -r1.7 -r1.8
  --- modperl_io_apache.c       31 Oct 2003 21:14:18 -0000      1.7
  +++ modperl_io_apache.c       1 Nov 2003 09:25:02 -0000       1.8
  @@ -57,7 +57,8 @@
           MP_TRACE_o(MP_FUNC, "stored request_rec obj: 0x%lx", st->r);
       }
       else {
  -        Perl_croak(aTHX_ "$r wasn't passed");
  +        Perl_croak(aTHX_"failed to insert the :Apache layer. "
  +                   "Apache::RequestRec object argument is required");
           /* XXX: try to get Apache->request? */
       }