summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-12-03 11:03:49 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-12-03 11:03:49 +0000
commitfa1db1a32484c256ed15fbd500ceb7b4dd195aa9 (patch)
tree31b3496051f1f4e30372607eeb60a1170804161c /perl-install
parent00cd17e16ff429957a5adb2d463db953d0864eeb (diff)
downloaddrakx-backup-do-not-use-fa1db1a32484c256ed15fbd500ceb7b4dd195aa9.tar
drakx-backup-do-not-use-fa1db1a32484c256ed15fbd500ceb7b4dd195aa9.tar.gz
drakx-backup-do-not-use-fa1db1a32484c256ed15fbd500ceb7b4dd195aa9.tar.bz2
drakx-backup-do-not-use-fa1db1a32484c256ed15fbd500ceb7b4dd195aa9.tar.xz
drakx-backup-do-not-use-fa1db1a32484c256ed15fbd500ceb7b4dd195aa9.zip
more debug log
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_gtk.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index e7ab57d7a..108b8a256 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -70,6 +70,7 @@ sub new($$) {
}
my $nb;
foreach (1..60) {
+ log::l("waiting for the server to start ($_ $nb)");
log::l("Server died"), return 0 if !fuzzy_pidofs(qr/\b$server\b/);
$nb++ if xf86misc::main::Xtest($wanted_DISPLAY);
if ($nb > 2) { #- one succeeded test is not enough :-(