From a4e6acb7d49063a117261eaf85f31fcfd281bfe7 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 15 Dec 2005 09:14:01 +0000
Subject: - i had foolishly removed c::iconv whereas it was used still used by
 c::from_utf8 and c::to_utf8 - anyway, moving c::from_utf8 and c::to_utf8 to
 common::from_utf8 and common::to_utf8 - making them use
 Locale::gettext::iconv - Locale::gettext::iconv transform undef into standard
 charset (1.05-2mdk) - drop c::standard_charset (now unused)

---
 perl-install/c/stuff.pm    | 3 ---
 perl-install/c/stuff.xs.pl | 7 -------
 2 files changed, 10 deletions(-)

(limited to 'perl-install/c')

diff --git a/perl-install/c/stuff.pm b/perl-install/c/stuff.pm
index 405f896cd..37e0c9a3b 100644
--- a/perl-install/c/stuff.pm
+++ b/perl-install/c/stuff.pm
@@ -11,7 +11,4 @@ $VERSION = '0.01';
 
 c::stuff->bootstrap($VERSION);
 
-sub from_utf8 { iconv($_[0], "utf-8", standard_charset()) }
-sub to_utf8 { iconv($_[0], standard_charset(), "utf-8") }
-
 1;
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl
index 59c842993..8ad3fd82d 100644
--- a/perl-install/c/stuff.xs.pl
+++ b/perl-install/c/stuff.xs.pl
@@ -666,13 +666,6 @@ upgrade_utf8(s)
    CODE:
    sv_utf8_upgrade(s);
 
-char *
-standard_charset()
-  CODE:
-  RETVAL = nl_langinfo(CODESET);
-  OUTPUT:
-  RETVAL
-
 void
 get_iso_volume_ids(int fd)
   INIT:
-- 
cgit v1.2.1