From db4c086af0ece66fd3449d6b742009e56bee697c Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Tue, 11 Feb 2003 14:16:43 +0000
Subject: thx perl checko

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

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

diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index 4d565b68c..1c73ebe6e 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -566,6 +566,7 @@ sub pack_langs {
 
 sub system_locales_to_ourlocale {
     my ($locale_lang, $locale_country) = @_;
+    my $locale;
     if (member($locale_lang, list_langs())) {
 	#- special lang's such as en_US pt_BR
 	$locale->{lang} = $locale_lang;
-- 
cgit v1.2.1