shaba/libvirt
1
0
Fork 0
mirror of https://gitlab.com/libvirt/libvirt.git synced 2025-01-26 14:03:49 +03:00
Code Releases Activity

test-wrap-argv: hold a copy of the original file in an array

Browse Source 
This will be useful to check if the file is wrapped already.
This commit is contained in:
Ján Tomko 2016-06-15 13:04:52 +02:00
parent 80880fd4af
commit b0590a53a5
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tests/test-wrap-argv.pl
View File

@ -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