Encode 1.76 Released

[p5sagit/p5-mst-13.2.git] / reentr.c

diff --git a/reentr.c b/reentr.c
index 310848e..acbbac4 100644 (file)
--- a/reentr.c
+++ b/reentr.c
@@ -148,6 +148,8 @@ Perl_reentrant_init(pTHX) {
 #ifdef HAS_CRYPT_R
 #ifdef __GLIBC__
        PL_reentrant_buffer->_crypt_struct.initialized = 0;
+       /* work around glibc-2.2.5 bug */
+       PL_reentrant_buffer->_crypt_struct.current_saltbits = 0;
 #endif
 #endif /* HAS_CRYPT_R */
 #ifdef HAS_CTIME_R