aboutsummaryrefslogtreecommitdiff
path: root/regress/tests/httpd.pl
diff options
context:
space:
mode:
Diffstat (limited to 'regress/tests/httpd.pl')
-rw-r--r--regress/tests/httpd.pl7
1 files changed, 4 insertions, 3 deletions
diff --git a/regress/tests/httpd.pl b/regress/tests/httpd.pl
index 481a587..6ca2d83 100644
--- a/regress/tests/httpd.pl
+++ b/regress/tests/httpd.pl
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-# $OpenBSD: httpd.pl,v 1.1 2015/07/16 16:35:57 reyk Exp $
+# $OpenBSD: httpd.pl,v 1.2 2016/05/03 19:13:04 bluhm Exp $
# Copyright (c) 2010-2015 Alexander Bluhm <bluhm@openbsd.org>
# Copyright (c) 2015 Reyk Floeter <reyk@openbsd.org>
@@ -41,7 +41,8 @@ if (@ARGV and -f $ARGV[-1]) {
my $redo = $args{lengths} && @{$args{lengths}};
$redo = 0 if $args{client}{http_vers}; # run only one persistent connection
my($sport, $rport) = find_ports(num => 2);
-my $d = Httpd->new(
+my($d, $c);
+$d = Httpd->new(
chroot => $ARGV[0],
listendomain => AF_INET,
listenaddr => "127.0.0.1",
@@ -52,7 +53,7 @@ my $d = Httpd->new(
%{$args{httpd}},
testfile => $testfile,
);
-my $c = Client->new(
+$c = Client->new(
chroot => $ARGV[0],
func => \&http_client,
connectdomain => AF_INET,