From 999b73ce97ee825cee859ad4a6d827d1bffb5911 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Mon, 17 Sep 2007 10:30:19 +0000
Subject: kill "use any"

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

diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index 8f7bc41c1..26c0b5341 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -5,7 +5,6 @@ use strict;
 use common;
 use utf8;
 use log;
-use any;
 
 #- key: lang name (locale name for some (~5) special cases needing
 #-      extra distinctions)
@@ -716,6 +715,7 @@ sub get_default_im {
 sub IM2packages {
     my ($locale) = @_;
     if ($locale->{IM}) {
+	require any;
 	my @sessions = any::sessions();
 	$is_kde3 = member('KDE', @sessions);
 	$is_kde4 = member('KDE', @sessions);
-- 
cgit v1.2.1