- -doc-pod R: perldoc, added missing %%{perl_privlib}/pod dir to -perldoc

[packages/perl.git] / perl_580-perluniintro.patch

--- pod/perluniintro.pod.orig	Thu Feb  6 12:45:57 2003
+++ pod/perluniintro.pod	Thu Feb  6 12:46:10 2003
@@ -363,7 +363,7 @@
 
 With the C<open> pragma you can use the C<:locale> layer
 
-    $ENV{LC_ALL} = $ENV{LANG} = 'ru_RU.KOI8-R';
+    BEGIN { $ENV{LC_ALL} = $ENV{LANG} = 'ru_RU.KOI8-R'; }
     # the :locale will probe the locale environment variables like LC_ALL
     use open OUT => ':locale'; # russki parusski
     open(O, ">koi8");