Gentoo Archives: gentoo-commits

From: "Tony Vroon (chainsaw)" <chainsaw@g.o>
To: gentoo-commits@l.g.o
Subject: [gentoo-commits] gentoo-x86 commit in app-arch/deb2targz/files: deb2targz-lzma-support.patch
Date: Tue, 30 Aug 2011 10:50:14
Message-Id: 20110830105004.7220E20051@flycatcher.gentoo.org
1 chainsaw 11/08/30 10:50:04
2
3 Added: deb2targz-lzma-support.patch
4 Log:
5 Support for LZMA as written by Oschtan in bug #357703. Ported to EAPI 4.
6
7 (Portage version: 2.1.10.11/cvs/Linux x86_64)
8
9 Revision Changes Path
10 1.1 app-arch/deb2targz/files/deb2targz-lzma-support.patch
11
12 file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/app-arch/deb2targz/files/deb2targz-lzma-support.patch?rev=1.1&view=markup
13 plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/app-arch/deb2targz/files/deb2targz-lzma-support.patch?rev=1.1&content-type=text/plain
14
15 Index: deb2targz-lzma-support.patch
16 ===================================================================
17 --- deb2targz-old 2011-03-07 03:24:22.000000000 +0600
18 +++ deb2targz 2011-03-07 03:22:20.000000000 +0600
19 @@ -59,4 +59,15 @@
20 next FILE;
21 }
22 + if ($name eq "data.tar.lzma") {
23 + # Found it
24 + $data = substr($data, 0, $len);
25 + $filename =~ s/\.deb$/.tar.gz/;
26 + my $fh = new IO::File(">$filename")
27 + or die "can't write '$filename': $!";
28 + print $fh $data;
29 + $fh->close();
30 + print "$0: wrote '$filename'\n";
31 + next FILE;
32 + }
33
34 print "$0: skipping section '$name'\n";