summaryrefslogtreecommitdiffstats
path: root/perl-install/install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-06-04 20:21:18 +0000
committerThierry Vignaud <tv@mageia.org>2012-06-04 20:21:18 +0000
commitaa25a178c1da85a0247bf4e370060aff2008b1c9 (patch)
treee6bdd76e6a4a88628cb682c1638e538f30b4e262 /perl-install/install
parent12bc3d3fabf3572e5eeded3fb0b8a0bd576626c5 (diff)
downloaddrakx-aa25a178c1da85a0247bf4e370060aff2008b1c9.tar
drakx-aa25a178c1da85a0247bf4e370060aff2008b1c9.tar.gz
drakx-aa25a178c1da85a0247bf4e370060aff2008b1c9.tar.bz2
drakx-aa25a178c1da85a0247bf4e370060aff2008b1c9.tar.xz
drakx-aa25a178c1da85a0247bf4e370060aff2008b1c9.zip
(createXconf) simplify, more readable
Diffstat (limited to 'perl-install/install')
-rw-r--r--perl-install/install/gtk.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index f7baac33d..a447e215d 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -255,7 +255,8 @@ sub createXconf {
#- remove "error opening security policy file" warning
symlink("/tmp/stage2/etc/X11", "/etc/X11");
-if ($Driver) {
+ return if !$Driver;
+
my ($mouse_driver, $mouse_protocol) = detect_devices::is_vmware() ? qw(vmmouse auto) : ('mouse', $mouse_type);
output($file, sprintf(<<'END', $mouse_driver, $mouse_protocol, $Driver, $Driver eq 'fbdev' ? '"default"' : '"800x600" "640x480"'));
Section "ServerFlags"
@@ -323,7 +324,6 @@ Section "ServerLayout"
EndSection
END
- }
}
1;