diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/harddrake/data.pm | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/service_harddrake | 3 |
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm index a9c723264..eda938d58 100644 --- a/perl-install/harddrake/data.pm +++ b/perl-install/harddrake/data.pm @@ -123,8 +123,10 @@ our @tree = string => N("Videocard"), icon => "video.png", configurator => "$sbindir/XFdrake", + configurator_auto => "$sbindir/XFdrake --auto", detector => sub { f(grep { $_->{driver} =~ /^(Card|Server):/ || $_->{media_type} =~ /DISPLAY_VGA/ } @devices) }, checked_on_boot => 1, + automatic => 1, }, { diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index 32704fc24..bc06b1042 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -39,7 +39,8 @@ my $in; my $splash = -f '/proc/splash'; # For each hw, class, detect device, compare and offer to reconfigure if needed foreach my $hw_class (@harddrake::data::tree) { - my ($Ident, $item, $configurator, $detector, $do_it) = @$hw_class{qw(class string configurator detector checked_on_boot)}; + my ($Ident, $item, $configurator, $detector, $do_it) = @$hw_class{qw(class string configurator_auto detector checked_on_boot)}; + $configurator ||= $hw_class->{configurator}; next unless $do_it ^ $invert_do_it; # No detector ? (should never happen but who know ?) |