From 5dabbb886b156092a0710c6d24903d7363221d4b Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 16 Aug 2004 05:09:10 +0000
Subject: replace freeDriver with freedriver (stage2 para are lower cased)

---
 perl-install/Xconfig/card.pm | 2 +-
 perl-install/install2.pm     | 2 +-
 perl-install/install_any.pm  | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/Xconfig/card.pm b/perl-install/Xconfig/card.pm
index 2a20abdb6..6330285ea 100644
--- a/perl-install/Xconfig/card.pm
+++ b/perl-install/Xconfig/card.pm
@@ -289,7 +289,7 @@ sub install_server {
 	push @packages, 'xorg-x11-glide-module' if $card->{card_name} =~ /Voodoo/;
     }
 
-    if ($options->{freeDriver}) {
+    if ($options->{freedriver}) {
 	delete $card->{Driver2};
     }
 
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 0ae072f13..bad07fac9 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -389,7 +389,7 @@ sub main {
 	    vga       => sub { $o->{vga} = $v },
 	    step      => sub { $o->{steps}{first} = $v },
 	    meta_class => sub { $o->{meta_class} = $v },
-	    freeDriver => sub { $o->{freeDriver} = $v },
+	    freedriver => sub { $o->{freedriver} = $v },
 	    readonly  => sub { $o->{partitioning}{readonly} = $v ne "0" },
 	    display   => sub { $o->{display} = $v },
 	    askdisplay => sub { print "Please enter the X11 display to perform the install on ? "; $o->{display} = chomp_(scalar(<STDIN>)) },
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 56a5de2ec..63d4aa4fa 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -1232,7 +1232,7 @@ sub log_sizes {
 sub X_options_from_o {
     my ($o) = @_;
     { 
-	freeDriver => $o->{freeDriver},
+	freedriver => $o->{freedriver},
 	allowFB => $o->{allowFB},
     };
 }
-- 
cgit v1.2.1