diff options
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index dfb43f872..b7c53e730 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -98,9 +98,8 @@ sub new($$) { foreach (@servers) { log::l("Trying with server $_"); - sleep 3; my $dir = "/usr/X11R6/bin"; - my $prog = /Xsun/ || /Xpmac/ ? $_ : "XF86_$_"; + my $prog = /Xsun|Xpmac/ ? $_ : "XF86_$_"; unless (-x "$dir/$prog") { unlink $_ foreach glob_("$dir/X*"); install_any::getAndSaveFile("$dir/$prog", "$dir/$prog") or die "failed to get server $prog: $!"; |