diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-03-26 17:24:17 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-03-26 17:24:17 +0000 |
commit | 3dc656d58b4359dc8c54069d83ee52582c3fccde (patch) | |
tree | 1511bc563b44c3c10a4a15f783cba62bc39753dc /build_archive | |
parent | 3c1ffd559e4ce1dbc71b4e6f3ef3975ea2fc5a31 (diff) | |
download | rpmtools-3dc656d58b4359dc8c54069d83ee52582c3fccde.tar rpmtools-3dc656d58b4359dc8c54069d83ee52582c3fccde.tar.gz rpmtools-3dc656d58b4359dc8c54069d83ee52582c3fccde.tar.bz2 rpmtools-3dc656d58b4359dc8c54069d83ee52582c3fccde.tar.xz rpmtools-3dc656d58b4359dc8c54069d83ee52582c3fccde.zip |
no_comment
Diffstat (limited to 'build_archive')
-rwxr-xr-x | build_archive | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/build_archive b/build_archive index e2b21f2..b81eea5 100755 --- a/build_archive +++ b/build_archive @@ -103,7 +103,7 @@ sub main { system "cat @filelist | $compress >tmp.z"; $siz1 = -s "tmp.z"; - $data{$_} = [ 'f', $off1, $siz1, $data{$_}[3], $data{$_}[4] ] foreach @filelist; + foreach (@filelist) { $data{$_} = [ 'f', $off1, $siz1, $data{$_}[3], $data{$_}[4] ] } system "cat tmp.z >>$archivename"; $off1 += $siz1; @@ -117,7 +117,7 @@ sub main { system "cat @filelist | $compress >tmp.z"; $siz1 = -s "tmp.z"; - $data{$_} = [ 'f', $off1, $siz1, $data{$_}[3], $data{$_}[4] ] foreach @filelist; + foreach (@filelist) { $data{$_} = [ 'f', $off1, $siz1, $data{$_}[3], $data{$_}[4] ] } system "cat tmp.z >>$archivename"; $off1 += $siz1; |