Package: devscripts
Version: 2.9.16
Followup-For: Bug #356959
tags 356959 +patch
thanks
This warnings problem, appeared when using regexes in the uri, and no
action nor lastversion specified.
Here I include a patch that fixes this problem, and cleans up the
handling of this special situation. The previous patch was incomplete
as it didn't handled the $lastversion being undefined.
-- System Information:
Debian Release: testing/unstable
APT prefers testing-proposed-updates
APT policy: (500, 'testing-proposed-updates'), (500,
'proposed-updates'), (500, 'testing'), (500, 'stable')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.15-1-686
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Versions of packages devscripts depends on:
ii debianutils 2.15.3 Miscellaneous utilities specific t
ii dpkg-dev 1.13.16 package building tools for Debian
ii libc6 2.3.5-13 GNU C Library: Shared libraries an
ii perl 5.8.8-2 Larry Wall's Practical Extraction
ii sed 4.1.4-5 The GNU sed stream editor
Versions of packages devscripts recommends:
ii fakeroot 1.5.7 Gives a fake root environment
-- no debconf information
diff -Naur devscripts-2.9.16/uscan.pl devscripts-2.9.16-new/uscan.pl
--- devscripts-2.9.16/uscan.pl 2006-03-27 06:07:52.000000000 -0300
+++ devscripts-2.9.16-new/uscan.pl 2006-04-14 18:36:53.095966312 -0300
@@ -660,10 +660,10 @@
($base, $filepattern, $lastversion, $action) = split ' ', $line, 4;
if ($base =~ m%/([^/]*\([^/]*\)[^/]*)$%) {
- # only three fields; action might be multiword, though
- $action = $lastversion . (defined $action ? " $action" : "");
- $lastversion = $filepattern;
+ # Last component of $base has a pair of parentheses.
$filepattern = $1;
+ # only three fields; action might be multiword, though
+ ($base, $lastversion, $action) = split ' ', $line, 3;
$base =~ s%/[^/]+$%/%;
}
