support for using protocol without a trailing newline

This commit is contained in:
Daniel Stenberg 2002-02-22 10:50:36 +00:00
parent 7d043f46d5
commit ae8a8c8ba4
2 changed files with 13 additions and 2 deletions

View file

@ -602,6 +602,15 @@ sub singletest {
my @protstrip=@protocol;
# check if there's any attributes on the verify/protocol section
my %hash = getpartattr("verify", "protocol");
if($hash{'nonewline'}) {
# Yes, we must cut off the final newline from the final line
# of the protocol data
chomp($protstrip[$#protstrip]);
}
for(@strip) {
# strip all patterns from both arrays
@out = striparray( $_, \@out);