does this patch (untested) cure the problem?

Index: src/modules/perl/modperl_interp.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_interp.c,v
retrieving revision 1.52
diff -u -r1.52 modperl_interp.c
--- src/modules/perl/modperl_interp.c   27 Aug 2002 04:24:08 -0000      1.52
+++ src/modules/perl/modperl_interp.c   22 Oct 2002 02:48:38 -0000
@@ -63,6 +63,14 @@
 
         interp->perl = perl_clone(perl, clone_flags);
 
+#if defined(USE_REENTRANT_API) && defined(HAS_CRYPT_R) && defined(__GLIBC__)
+        {
+            dTHXa(interp->perl);
+            /* workaround 5.8.0 bug */
+            PL_reentrant_buffer->_crypt_struct.current_saltbits = 0;
+        }
+#endif
+
         {
             PTR_TBL_t *source = modperl_module_config_table_get(perl, FALSE);
             if (source) {



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to