RE: Re: Help Needed - RegistryCooker.pm -mod_perl-2 - Apache 2.0.35-(ActivePerl631)

Stas:

The fix still does not work. Here is the error message (OS: Windows NT 4.0 SP 6a; ActivePerl 628; PPM Install of Mod_Perl-1.99 from theoryx.uwinnipeg.ca and Apache 2.0.35):

Server error!
Error message: 
Attempt to free unreferenced scalar at E:/Perl/site/lib/Apache2/ModPerl/RegistryCooker.pm line 53. Compilation failed in require at E:/Perl/site/lib/Apache2/ModPerl/Registry.pm line 11. BEGIN failed--compilation aborted at E:/Perl/site/lib/Apache2/ModPerl/Registry.pm line 11. Compilation failed in require at (eval 2) line 3. 
If you think this is a server error, please contact the webmaster 
Error 500
retail_office 
04/16/02 10:58:18 PM 
Apache/2.0.35 (Win32) mod_perl/1.99_02-dev Perl/v5.6.1 

-- Rex
Stas Bekman <st...@stason.org> wrote:
>
>Try this patch that doug just committed to cvs:
>
>
>dougm       02/04/16 10:14:16
>
>   Modified:    ModPerl-Registry/lib/ModPerl RegistryCooker.pm
>   Log:
>   Apache->server->dir_config crashes on win32; comment it out for the 
>moment
>
>   Revision  Changes    Path
>   1.6       +5 -4 
>modperl-2.0/ModPerl-Registry/lib/ModPerl/RegistryCooker.pm
>
>   Index: RegistryCooker.pm
>   ===================================================================
>   RCS file: 
>/home/cvs/modperl-2.0/ModPerl-Registry/lib/ModPerl/RegistryCooker.pm,v
>   retrieving revision 1.5
>   retrieving revision 1.6
>   diff -u -r1.5 -r1.6
>   --- RegistryCooker.pm    13 Nov 2001 04:34:31 -0000  1.5
>   +++ RegistryCooker.pm    16 Apr 2002 17:14:16 -0000  1.6
>   @@ -42,10 +42,11 @@
>    # httpd.conf with:
>    #   PerlSetVar ModPerl::RegistryCooker::DEBUG 4
>    use Apache::ServerUtil ();
>   -use constant DEBUG =>
>-    defined Apache->server->dir_config('ModPerl::RegistryCooker::DEBUG')
>   -        ? Apache->server->dir_config('ModPerl::RegistryCooker::DEBUG')
>   -        : D_NONE;
>   +use constant DEBUG => 0;
>   +#XXX: below currently crashes the server on win32
>   +#    defined 
>Apache->server->dir_config('ModPerl::RegistryCooker::DEBUG')
>   +#        ? Apache->server->dir_config('ModPerl::RegistryCooker::DEBUG')
>   +#        : D_NONE;
>
> 
>#########################################################################
>    # object's array index's access constants
>
>
>
>
>__________________________________________________________________
>Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
>http://stason.org/     mod_perl Guide ---> http://perl.apache.org
>mailto:stas@stason.org http://use.perl.org http://apacheweek.com
>http://modperlbook.org http://apache.org   http://ticketmaster.com
>
>


__________________________________________________________________
Your favorite stores, helpful shopping tools and great gift ideas. Experience the convenience of buying online with Shop@Netscape! http://shopnow.netscape.com/

Get your own FREE, personal Netscape Mail account today at http://webmail.netscape.com/