From efab3ecc89faa4ab36fc14a9307359d9478757eb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 5 Mar 2003 14:35:52 +0000 Subject: handle low case config variables despite they should have been upcase (fix side effects of stupid rh code that manage $prefdm) --- perl-install/standalone/drakedm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/drakedm b/perl-install/standalone/drakedm index 5cfdd1948..06de6b67d 100644 --- a/perl-install/standalone/drakedm +++ b/perl-install/standalone/drakedm @@ -36,7 +36,7 @@ my %dm = ('GNOME' => 'GDM (GNOME Display Manager)', my $dm = 'KDE'; foreach (cat_($cfg_file)) { - $dm = $1 if /^DISPLAYMANAGER=(.*)$/; + $dm = uc($1) if /^DISPLAYMANAGER=(.*)$/; } if (my $new_dm = $in->ask_from_list_(N("Choosing a display manager"), -- cgit v1.2.1