You are viewing a plain text version of this content. The canonical link for it is here.
Posted to dev@perl.apache.org by sterling <st...@covalent.net> on 2001/03/13 01:24:06 UTC

Re: mod_perl.c:517: unterminated string or character constant

actually - with recent changes to the apache core, that patch doesn't work
any more.  we're working on a real fix - but in the mean time this one may
as well be removed.


sterling
_____________________________________________________________________________

Index: src/modules/perl/mod_perl.c
===================================================================
RCS file: /home/cvspublic/modperl/src/modules/perl/mod_perl.c,v
retrieving revision 1.135
diff -u -r1.135 mod_perl.c
--- src/modules/perl/mod_perl.c	2001/02/16 23:30:27	1.135
+++ src/modules/perl/mod_perl.c	2001/03/13 00:18:07
@@ -509,18 +509,6 @@
 { 
     array_header *librefs;
 
-#ifdef WIN32
-    // This is here to stop a crash when bringing down
-    // a service.  Apparently the dso is unloaded too early.
-    // This if statement tests to see if we are running as a 
-    // service. apache does the same
-    // see apache's isProcessService() in service.c 
-    if (AllocConsole()) {
-        FreeConsole();
-        return;
-    } 
-#endif
-
     librefs = xs_dl_librefs((pool *)data);
     perl_shutdown(NULL, NULL);
     unload_xs_so(librefs);


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Re: mod_perl.c:517: unterminated string or character constant

Posted by Doug MacEachern <do...@covalent.net>.
thanks, applied.

On Mon, 12 Mar 2001, sterling wrote:

> actually - with recent changes to the apache core, that patch doesn't work
> any more.  we're working on a real fix - but in the mean time this one may
> as well be removed.
> 
> 
> sterling
> _____________________________________________________________________________
> 
> Index: src/modules/perl/mod_perl.c
> ===================================================================
> RCS file: /home/cvspublic/modperl/src/modules/perl/mod_perl.c,v
> retrieving revision 1.135
> diff -u -r1.135 mod_perl.c
> --- src/modules/perl/mod_perl.c	2001/02/16 23:30:27	1.135
> +++ src/modules/perl/mod_perl.c	2001/03/13 00:18:07
> @@ -509,18 +509,6 @@
>  { 
>      array_header *librefs;
>  
> -#ifdef WIN32
> -    // This is here to stop a crash when bringing down
> -    // a service.  Apparently the dso is unloaded too early.
> -    // This if statement tests to see if we are running as a 
> -    // service. apache does the same
> -    // see apache's isProcessService() in service.c 
> -    if (AllocConsole()) {
> -        FreeConsole();
> -        return;
> -    } 
> -#endif
> -
>      librefs = xs_dl_librefs((pool *)data);
>      perl_shutdown(NULL, NULL);
>      unload_xs_so(librefs);
> 
> 
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
> For additional commands, e-mail: dev-help@perl.apache.org
> 


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org