generic-library/curl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

testcurl: Allow '=' in values given on command line

Browse Source
This commit is contained in:
Dagobert Michelsen 2015-03-21 15:38:56 +01:00 committed by Daniel Stenberg
parent b734518371
commit 57dc2f7e40
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
tests/testcurl.pl
View File

@ -88,25 +88,25 @@ $setupfile = 'setup';
$configurebuild = 1; $configurebuild = 1;
while ($ARGV[0]) { while ($ARGV[0]) {
if ($ARGV[0] =~ /--target=/) { if ($ARGV[0] =~ /--target=/) {
$targetos = (split(/=/, shift @ARGV))[1]; $targetos = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--setup=/) { elsif ($ARGV[0] =~ /--setup=/) {
$setupfile = (split(/=/, shift @ARGV))[1]; $setupfile = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--extvercmd=/) { elsif ($ARGV[0] =~ /--extvercmd=/) {
$extvercmd = (split(/=/, shift @ARGV))[1]; $extvercmd = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--mktarball=/) { elsif ($ARGV[0] =~ /--mktarball=/) {
$mktarball = (split(/=/, shift @ARGV))[1]; $mktarball = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--name=/) { elsif ($ARGV[0] =~ /--name=/) {
$name = (split(/=/, shift @ARGV))[1]; $name = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--email=/) { elsif ($ARGV[0] =~ /--email=/) {
$email = (split(/=/, shift @ARGV))[1]; $email = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--desc=/) { elsif ($ARGV[0] =~ /--desc=/) {
$desc = (split(/=/, shift @ARGV))[1]; $desc = (split(/=/, shift @ARGV, 2))[1];
} }
elsif ($ARGV[0] =~ /--configure=(.*)/) { elsif ($ARGV[0] =~ /--configure=(.*)/) {
$confopts = $1; $confopts = $1;