diff options
| -rw-r--r-- | perl-install/Xconfig/card.pm | 2 | ||||
| -rw-r--r-- | perl-install/install2.pm | 2 | ||||
| -rw-r--r-- | perl-install/install_any.pm | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/Xconfig/card.pm b/perl-install/Xconfig/card.pm index 8e47b3205..cbb33a3a5 100644 --- a/perl-install/Xconfig/card.pm +++ b/perl-install/Xconfig/card.pm @@ -353,7 +353,7 @@ sub install_server { push @packages, 'Mesa'; } - if ($options->{freeDriver}) { + if ($options->{free_driver}) { delete $card->{Driver2}; } diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 6a95c964b..95719f98e 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -384,7 +384,7 @@ sub main { step => sub { $o->{steps}{first} = $v }, expert => sub { $::expert = $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 37f64ab39..9e2543780 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1114,7 +1114,7 @@ sub log_sizes { sub X_options_from_o { my ($o) = @_; { - freeDriver => $o->{freeDriver}, + freedriver => $o->{freedriver}, allowFB => $o->{allowFB}, }; } |