summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/service_harddrake9
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake
index 59e366296..b441eb662 100755
--- a/perl-install/standalone/service_harddrake
+++ b/perl-install/standalone/service_harddrake
@@ -75,10 +75,10 @@ sub schedule_warn_about_switch() {
}
sub switch_x_driver {
- my ($old_driver, $new_driver) = @_;
+ my ($old_driver, $new_driver, $reason) = @_;
cp_af('/etc/X11/xorg.conf', "/etc/X11/xorg.conf.mdv$^T");
substInFile { s!Driver "($old_driver)"!Driver "$new_driver"!g } '/etc/X11/xorg.conf';
- log::explanations("switch X.org driver from $old_driver to $new_driver");
+ log::explanations("switch X.org driver from $old_driver to $new_driver ($reason)");
Xconfig::card::libgl_config_and_more({ Driver => $new_driver });
}
@@ -104,7 +104,7 @@ foreach my $card (@cards) {
my $current_driver = get_xorg_driver();
if (!member($current_driver, $card_data->{Driver}, $card_data->{Driver2}, 'fbdev', 'vesa')) {
- switch_x_driver($current_driver, $card_data->{Driver});
+ switch_x_driver($current_driver, $card_data->{Driver}, 'no more supported by this driver');
schedule_warn_about_switch() if $current_driver =~ $card->{xorg_driver_regexp};
next;
}
@@ -125,7 +125,8 @@ foreach my $card (@cards) {
my $driver = $cards[0]{Driver};
my $old_driver = $1 if cat_('/etc/X11/xorg.conf') =~ /Driver "($card->{xorg_driver_regexp})"/;
if ($old_driver) {
- switch_x_driver($card->{xorg_driver_regexp}, $driver);
+ switch_x_driver($card->{xorg_driver_regexp}, $driver,
+ 'proprietary driver not found for current driver');
schedule_warn_about_switch();
}
}