From 260fe6ccef437482f2e1e40655a9100a1e8f18df Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 8 Jun 2001 18:04:41 +0000
Subject: - c::iconv replace c::from_utf8 and c::to_utf8 - handle po files in
 any charset, iconv'ed to the right charset

---
 perl-install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/any.pm')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index a1a2da268..a4710b375 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -801,6 +801,6 @@ sub runlevel {
     }
 }
 
-sub to_utf8 { c::to_utf8($lang::charset || 'ISO-8859-1', $_[0]) }
+sub to_utf8 { c::iconv($_[0], $lang::charset || 'ISO-8859-1', "utf-8") }
 
 1;
-- 
cgit v1.2.1