Re: our wmk/wml broke with perl (5.6.1) upgrade -- help!

[Denis Barbier <nospam@thanx>]

On Tue, Oct 23, 2001 at 11:36:28AM +0200, Martin Maechler wrote:
[...]
>     >> ---- Contents of STDERR channel: ---------
>     >> DynaLoader object version 1.04 does not match $DynaLoader::VERSION 1 at /usr/local/lib/perl5/5.6.1/i686-linux/DynaLoader.pm line 100.
[...]
> As soon as we deactivated the LC_ALL environment variable
> everything worked :
> 
> 
>   lynne{sfs}202> printenv | grep LC
>   LC_ALL=de_CH
> 
>   lynne{sfs}203> unsetenv LC_ALL
> 
>   lynne{sfs}204> wmk
> 
>   (and all was fine)
> 
> Thanks for fixing this, or working around the perl problem if it's perl's
> fault..

Hi Martin,

here is a patch.

-- 
Denis Barbier
WML Maintainer
Index: wml_backend/p3_eperl/eperl_main.c
===================================================================
RCS file: /home/barbier/Projets/Wml/cvs/wml/wml_backend/p3_eperl/eperl_main.c,v
retrieving revision 1.8
diff -u -u -r1.8 eperl_main.c
--- wml_backend/p3_eperl/eperl_main.c	2001/03/10 21:47:45	1.8
+++ wml_backend/p3_eperl/eperl_main.c	2001/10/28 23:39:50
@@ -1051,17 +1051,17 @@
     }
     IO_redirect_stderr(er);
 
-    /*  now allocate the Perl interpreter  */
-    my_perl = perl_alloc();   
-    perl_construct(my_perl); 
-    /* perl_destruct_level = 1; */
-
     /*  initialise the Perl Locale environment  */
 #if AC_perl_vnum < 500400
     perl_init_i18nl14n(1); /* Perl 5.003 or lower */
 #else
     perl_init_i18nl10n(1); /* Perl 5.004 or higher */
 #endif
+
+    /*  now allocate the Perl interpreter  */
+    my_perl = perl_alloc();   
+    perl_construct(my_perl); 
+    /* perl_destruct_level = 1; */
 
     /*  create command line...  */
     myargc = 0;