perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@hyperreal.org
Subject cvs commit: modperl/src/modules/perl perl_config.c
Date Fri, 22 Jan 1999 19:43:08 GMT
dougm       99/01/22 11:43:07

  Modified:    src/modules/perl perl_config.c
  Log:
  minor fixes for thrperl
  
  Revision  Changes    Path
  1.64      +2 -0      modperl/src/modules/perl/perl_config.c
  
  Index: perl_config.c
  ===================================================================
  RCS file: /export/home/cvs/modperl/src/modules/perl/perl_config.c,v
  retrieving revision 1.63
  retrieving revision 1.64
  diff -u -r1.63 -r1.64
  --- perl_config.c	1999/01/18 04:25:57	1.63
  +++ perl_config.c	1999/01/22 19:43:02	1.64
  @@ -507,6 +507,7 @@
       require_Apache(parms->server);
       if(PERL_RUNNING()) {
   	if (perl_require_module(arg, NULL) != OK) {
  +	    dTHR;
   	    return SvPV(ERRSV,na);
   	}
       }
  @@ -532,6 +533,7 @@
       MP_TRACE_d(fprintf(stderr, "perl_cmd_require: %s\n", arg));
       if(PERL_RUNNING()) {
   	if (perl_load_startup_script(NULL, parms->pool, arg, TRUE) != OK) {
  +	    dTHR;
   	    return SvPV(ERRSV,na);
   	}
       }
  
  
  

Mime
View raw message