From 3afe5abfe6705bf7df25bf4e546e438833e14e31 Mon Sep 17 00:00:00 2001 From: Eric Bollengier Date: Wed, 21 Jul 2010 10:46:54 +0200 Subject: [PATCH] regress: add a start message in regress-win32.pl --- regress/scripts/regress-win32.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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) { -- 2.39.5