From b0590a53a5f642a14ef41d1a66caebd4250db376 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A1n=20Tomko?= <jtomko@redhat.com>
Date: Wed, 15 Jun 2016 13:04:52 +0200
Subject: [PATCH] test-wrap-argv: hold a copy of the original file in an array
This will be useful to check if the file is wrapped already.
---
tests/test-wrap-argv.pl | 9 ++++-----
1 file changed, 4 insertions(+), 5 deletions(-)
diff --git a/tests/test-wrap-argv.pl b/tests/test-wrap-argv.pl
index 1f619cc7b0..96f998a095 100755
--- a/tests/test-wrap-argv.pl
+++ b/tests/test-wrap-argv.pl
@@ -33,15 +33,15 @@ sub rewrap {
# Read the original file
open FILE, "<", $file or die "cannot read $file: $!";
- my @lines;
- while (<FILE>) {
+ my @orig_lines = <FILE>;
+ close FILE;
+ my @lines = @orig_lines;
+ foreach (@lines) {
# If there is a trailing '\' then kill the new line
if (/\\$/) {
chomp;
$_ =~ s/\\$//;
}
-
- push @lines, $_;
}
# Skip empty files
@@ -49,7 +49,6 @@ sub rewrap {
# Kill the last new line in the file
chomp @lines[$#lines];
- close FILE;
# Reconstruct the master data by joining all lines
# and then split again based on the real desired