From: Eric Bollengier Date: Wed, 21 Jul 2010 08:46:54 +0000 (+0200) Subject: regress: add a start message in regress-win32.pl X-Git-Tag: Release-5.2.1~1173 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=3afe5abfe6705bf7df25bf4e546e438833e14e31;p=bacula%2Fbacula regress: add a start message in regress-win32.pl --- diff --git a/regress/scripts/regress-win32.pl b/regress/scripts/regress-win32.pl index 6ecdc7c21d..e2e8fa5d7c 100644 --- a/regress/scripts/regress-win32.pl +++ b/regress/scripts/regress-win32.pl @@ -437,10 +437,11 @@ sub handle_client my $d = HTTP::Daemon->new ( LocalPort => 8091, ReuseAddr => 1) - || die "E : Can't bind $!" ; + || die "Error: Can't bind $!" ; my $olddir = Cwd::cwd(); while (1) { + print "Starting daemon...\n"; my $c = $d->accept ; my $ip = $c->peerhost; if (!$ip) {