diff options
Diffstat (limited to 'tests/httpserver.pl')
-rwxr-xr-x | tests/httpserver.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/tests/httpserver.pl b/tests/httpserver.pl index 7faef92f9..d458a35c2 100755 --- a/tests/httpserver.pl +++ b/tests/httpserver.pl @@ -4,14 +4,19 @@ use strict; my $verbose=0; # set to 1 for debugging +my $dir="."; my $port = 8999; # just a default do { if($ARGV[0] eq "-v") { $verbose=1; } + elsif($ARGV[0] eq "-d") { + $dir=$ARGV[1]; + shift @ARGV; + } elsif($ARGV[0] =~ /^(\d+)$/) { $port = $1; } } while(shift @ARGV); -exec("server/sws $port"); +exec("server/sws $port $dir"); |