From 4f2d7949f03e1c198bc888f2d05f421d35c57e21 Mon Sep 17 00:00:00 2001 From: V3n3RiX Date: Mon, 9 Oct 2017 18:53:29 +0100 Subject: reinit the tree, so we can have metadata --- app-arch/deb2targz/files/deb2targz-any-data.patch | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 app-arch/deb2targz/files/deb2targz-any-data.patch (limited to 'app-arch/deb2targz/files') diff --git a/app-arch/deb2targz/files/deb2targz-any-data.patch b/app-arch/deb2targz/files/deb2targz-any-data.patch new file mode 100644 index 000000000000..c8c42308ce1c --- /dev/null +++ b/app-arch/deb2targz/files/deb2targz-any-data.patch @@ -0,0 +1,17 @@ +Support any/all compression formats for data.tar +--- deb2targz ++++ deb2targz +@@ -47,10 +47,11 @@ + ($header, $data) = ($data =~ /(.*?)\n(.*)/s); + my($name, $num1, $num2, $num3, $num4, $len) = split /\s+/, $header; + #print "header='$header'\n\tname='$name', len=$len\n"; +- if ($name eq "data.tar.gz") { ++ if ($name =~ /^data\.tar(.*)$/) { + # Found it ++ my $ext = $1; + $data = substr($data, 0, $len); +- $filename =~ s/\.deb$/.tar.gz/; ++ $filename =~ s/\.deb$/.tar$ext/; + my $fh = new IO::File(">$filename") + or die "can't write '$filename': $!"; + print $fh $data; -- cgit v1.2.3