diff options
author | Michael Schroeder <mls@suse.de> | 2017-10-20 15:45:25 +0200 |
---|---|---|
committer | Yonghee Han <onstudy@samsung.com> | 2019-01-17 10:40:01 +0900 |
commit | 4e22dc5f07ae31f8800b3bfb054a734e6fec5adb (patch) | |
tree | 8d4ee87c9b683bf2b8de9d43577f5e7dd7d7637e /Build | |
parent | bc3a980fa60fe86d6a2e0c79242ab076db6fbb7f (diff) | |
download | build-4e22dc5f07ae31f8800b3bfb054a734e6fec5adb.tar.gz build-4e22dc5f07ae31f8800b3bfb054a734e6fec5adb.tar.bz2 build-4e22dc5f07ae31f8800b3bfb054a734e6fec5adb.zip |
Also support uncompressed control.tar files in queryhdrmd5
Change-Id: I43dfa992421836aba20d48acde8519a382d39ecb
Diffstat (limited to 'Build')
-rw-r--r-- | Build/Deb.pm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/Build/Deb.pm b/Build/Deb.pm index 7584191..7955cf6 100644 --- a/Build/Deb.pm +++ b/Build/Deb.pm @@ -392,11 +392,10 @@ sub queryhdrmd5 { } } $data = substr($data, 8 + 60 + $len); - if (substr($data, 0, 16) ne 'control.tar.gz ' && - substr($data, 0, 16) ne 'control.tar.gz/ ' && - substr($data, 0, 16) ne 'control.tar.xz ' && - substr($data, 0, 16) ne 'control.tar.xz/ ') - { + my $controlname = substr($data, 0, 16); + if ($controlname ne 'control.tar.gz ' && $controlname ne 'control.tar.gz/ ' && + $controlname ne 'control.tar.xz ' && $controlname ne 'control.tar.xz/ ' && + $controlname ne 'control.tar ' && $controlname ne 'control.tar/ ') { warn("$bin: control.tar is not second ar entry\n"); close F; return undef; |