diff options
| author | Daniel Stenberg <daniel@haxx.se> | 2001-06-27 22:01:08 +0000 |
|---|---|---|
| committer | Daniel Stenberg <daniel@haxx.se> | 2001-06-27 22:01:08 +0000 |
| commit | be449bdea1543913255dd160efbedf244e410dd3 (patch) | |
| tree | a5fbc543255cef67f6b56e5e0ae8e56ca72371d2 | |
| parent | 798aaf0c0a8a1f32c3a6f304ed173dc626ae7a4e (diff) | |
| download | gnurl-be449bdea1543913255dd160efbedf244e410dd3.tar.gz gnurl-be449bdea1543913255dd160efbedf244e410dd3.tar.bz2 gnurl-be449bdea1543913255dd160efbedf244e410dd3.zip | |
better strip
| -rwxr-xr-x | tests/runtests.pl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl index 84e910424..6fa44778f 100755 --- a/tests/runtests.pl +++ b/tests/runtests.pl @@ -567,9 +567,14 @@ sub singletest { # what to cut off from the live protocol sent by curl my @strip = getpart("verify", "strip"); - @out = striparray( $strip[0], \@out); - my @protstrip= striparray($strip[0], \@protocol); + my @protstrip=@protocol; + + for(@strip) { + # strip all patterns from both arrays + @out = striparray( $_, \@out); + @protstrip= striparray( $_, \@protstrip); + } $res = compare(\@out, \@protstrip); if($res) { |