From: Christian Couder Date: Sun, 5 Nov 2017 21:38:34 +0000 (+0100) Subject: t0021/rot13-filter: refactor checking final lf X-Git-Tag: v2.16.0-rc0~130^2~2 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=4a9ef1bbc19f362a63c3e3ab88c651f97cbd1c1d;p=thirdparty%2Fgit.git t0021/rot13-filter: refactor checking final lf As checking for a lf character at the end of a buffer will be useful in another function, let's refactor this functionality into a small remove_final_lf_or_die() helper function. Signed-off-by: Christian Couder Signed-off-by: Junio C Hamano --- diff --git a/t/t0021/rot13-filter.pl b/t/t0021/rot13-filter.pl index 2f74ab2e45..d47b7f5666 100644 --- a/t/t0021/rot13-filter.pl +++ b/t/t0021/rot13-filter.pl @@ -93,12 +93,20 @@ sub packet_bin_read { } } -sub packet_txt_read { - my ( $res, $buf ) = packet_bin_read(); - unless ( $res == -1 or $buf eq '' or $buf =~ s/\n$// ) { +sub remove_final_lf_or_die { + my $buf = shift; + unless ( $buf =~ s/\n$// ) { die "A non-binary line MUST be terminated by an LF.\n" . "Received: '$buf'"; } + return $buf; +} + +sub packet_txt_read { + my ( $res, $buf ) = packet_bin_read(); + unless ( $res == -1 or $buf eq '' ) { + $buf = remove_final_lf_or_die($buf); + } return ( $res, $buf ); }