Package: devscripts
Version: 2.10.45
Severity: wishlist
File: /usr/bin/uscan
Tags: patch

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hi

could you please add support for recompressing lzma to uscan? Attached
patch does it.

Thanks
- -- 
        Michal Čihař | http://cihar.com | http://blog.cihar.com

- -- Package-specific info:

- --- /etc/devscripts.conf ---

- --- ~/.devscripts ---
export DEBUILD_LINTIAN_OPTS=-iIE
DEBCHECKOUT_AUTH_URLS='
^\w+://(svn\.cihar\.com)/(.*) svn+ssh://$1/home/svn/$2
'

- -- System Information:
Debian Release: 5.0
  APT prefers unstable
  APT policy: (500, 'unstable'), (1, 'experimental')
Architecture: i386 (i686)

Kernel: Linux 2.6.26-1-686 (SMP w/1 CPU core)
Locale: LANG=cs_CZ.UTF-8, LC_CTYPE=cs_CZ.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash

Versions of packages devscripts depends on:
ii  dpkg-dev                      1.14.25    Debian package development tools
ii  libc6                         2.7-18     GNU C Library: Shared libraries
ii  perl                          5.10.0-19  Larry Wall's Practical Extraction 

Versions of packages devscripts recommends:
ii  at                 3.1.10.2              Delayed job execution and batch pr
ii  bsd-mailx [mailx]  8.1.2-0.20081101cvs-2 A simple mail user agent
ii  bzr                1.5-1.1               easy to use distributed version co
ii  curl               7.18.2-8              Get a file from an HTTP, HTTPS or 
ii  cvs                1:1.12.13-12          Concurrent Versions System
ii  dctrl-tools        2.13.1                Command-line tools to process Debi
ii  debian-keyring     2009.01.18            GnuPG (and obsolete PGP) keys of D
ii  debian-maintainers 1.52                  GPG keys of Debian maintainers
ii  dput               0.9.2.37              Debian package upload tool
ii  elinks [www-browse 0.12~pre2.dfsg0-1     advanced text-mode WWW browser
ii  epiphany-gecko [ww 2.24.2.1-1            Intuitive GNOME web browser - Geck
ii  epiphany-webkit [w 2.24.2.1-1            Intuitive GNOME web browser - webk
pn  equivs             <none>                (no description available)
ii  fakeroot           1.12.1                Gives a fake root environment
ii  git-core           1:1.5.6.5-3           fast, scalable, distributed revisi
ii  gnupg              1.4.9-3               GNU privacy guard - a free PGP rep
ii  iceweasel [www-bro 3.0.6-1               lightweight web browser based on M
ii  konqueror [www-bro 4:3.5.9.dfsg.1-6      KDE's advanced file manager, web b
ii  libauthen-sasl-per 2.12-1                Authen::SASL - SASL Authentication
ii  libcrypt-ssleay-pe 0.57-1+b1             Support for https protocol in LWP
ii  libparse-debcontro 2.005-2               Easy OO parsing of Debian control-
ii  libsoap-lite-perl  0.710.08-2            Client and server side SOAP implem
ii  libterm-size-perl  0.2-4+b1              Perl extension for retrieving term
ii  libtimedate-perl   1.1600-9              Time and date functions for Perl
ii  liburi-perl        1.37+dfsg-1           Manipulates and accesses URI strin
ii  libwww-perl        5.820-1               WWW client/server library for Perl
pn  libyaml-syck-perl  <none>                (no description available)
ii  lintian            2.2.2                 Debian package checker
ii  lsb-release        3.2-20                Linux Standard Base version report
ii  mailx              1:20081101-2          Transitional package for mailx ren
ii  man-db             2.5.2-4               on-line manual pager
ii  midori [www-browse 0.1.2-1               fast, lightweight graphical web br
ii  openssh-client [ss 1:5.1p1-5             secure shell client, an rlogin/rsh
ii  patch              2.5.9-5               Apply a diff file to an original
ii  patchutils         0.3.1-1               Utilities to work with patches
ii  strace             4.5.17+cvs080723-2    A system call tracer
ii  subversion         1.5.1dfsg1-2          Advanced version control system
ii  unzip              5.52-12               De-archiver for .zip files
ii  w3m [www-browser]  0.5.2-2+b1            WWW browsable pager with excellent
ii  wdiff              0.5-18                Compares two files word by word
ii  wget               1.11.4-2              retrieves files from the web

Versions of packages devscripts suggests:
ii  build-essential               11.4       Informational list of build-essent
pn  cvs-buildpackage              <none>     (no description available)
pn  devscripts-el                 <none>     (no description available)
pn  gnuplot                       <none>     (no description available)
ii  libfile-desktopentry-perl     0.04-2     Perl module to handle freedesktop 
pn  libnet-smtp-ssl-perl          <none>     (no description available)
ii  mutt                          1.5.18-4   text-based mailreader supporting M
ii  svn-buildpackage              0.6.23     helper programs to maintain Debian

- -- no debconf information

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.9 (GNU/Linux)

iEYEARECAAYFAkmOhXIACgkQ3DVS6DbnVgTwPgCfW04GCqx2d9Y4bVxjMXlgD0dx
cH4AoJAEEsiRn0N5r0UzeclIemSor13j
=+P8f
-----END PGP SIGNATURE-----
--- /usr/bin/uscan      2009-01-21 22:04:38.000000000 +0100
+++ /tmp/uscan  2009-02-08 08:07:49.000000000 +0100
@@ -1295,6 +1295,15 @@
        $newfile_base = $newfile_base_gz;
     }
 
+    if ($repack and $newfile_base =~ /^(.*)\.(tar\.lzma|tlzma?)$/) {
+       print "-- Repacking from lzma to gzip\n" if $verbose;
+       my $newfile_base_gz = "$1.tar.gz";
+       system("lzma -c $destdir/$newfile_base | gzip > 
$destdir/$newfile_base_gz") == 0
+         or die "repacking from lzma to gzip failed\n";
+       unlink "$destdir/$newfile_base";
+       $newfile_base = $newfile_base_gz;
+    }
+
     if ($repack and $newfile_base =~ /^(.*)\.zip$/) {
        print "-- Repacking from zip to .tar.gz\n" if $verbose;
 

Reply via email to