From e4a01c5567ea5ca4cf390aee16a07e624ee57c43 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 2 Jul 2004 03:48:39 +0000
Subject: disable languages which have no locales installed

---
 move/move.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/move/move.pm b/move/move.pm
index c1458407a..5c3f9a94b 100644
--- a/move/move.pm
+++ b/move/move.pm
@@ -106,8 +106,9 @@ sub setup_userconf {
 sub lang2move_clp_name {
     my ($lang) = @_;
     my $dir = '/usr/share/locale/' . lang::l2locale($lang);
+    -d $dir or return 'ERROR';
     my $link = readlink($dir) or return;
-    my ($name) = $link =~ m!image_(i18n_.*?)/! or log::l("ERROR: bad link $link for $dir"), return;
+    my ($name) = $link =~ m!image_(i18n_.*?)/! or log::l("ERROR: bad link $link for $dir"), return 'ERROR';
     $name;
 }
 
-- 
cgit v1.2.1