Hi,
The patch is attached.
Before my patch is applied:
$dpkg-depcheck bash -c 'cat /usr/lib/perl/5.14/Config.pm > /dev/null'
----------------------------------------------------------------------
The following files did not appear to belong to any package:
/usr/lib/perl/5.14/Config.pm
/lib/x86_64-linux-gnu/libtinfo.so.5
/usr/lib/locale/locale-archive
/bin/bash
/usr/lib/x86_64-linux-gnu/gconv/gconv-modules.cache
/lib/x86_64-linux-gnu/libc-2.13.so
/lib/x86_64-linux-gnu/libtinfo.so.5.9
/bin/cat
/lib/x86_64-linux-gnu/libdl.so.2
/lib/x86_64-linux-gnu/libdl-2.13.so
/lib/x86_64-linux-gnu/libc.so.6
Packages used:
perl-base
After I apply my patch:
$dpkg-depcheck bash -c 'cat /usr/lib/perl/5.14/Config.pm > /dev/null'
----------------------------------------------------------------------
The following files did not appear to belong to any package:
/usr/lib/perl/5.14/Config.pm
/usr/lib/locale/locale-archive
Packages used:
libc6:amd64
bash
perl-base
coreutils
libtinfo5:amd64
--
All the best
Bao Haojun
diff --git a/Packages.pm b/Packages.pm
index 7ceea21..66f547f 100644
--- a/Packages.pm
+++ b/Packages.pm
@@ -179,6 +179,9 @@ sub FilesToPackages (@)
elsif (/^dpkg: \Q$curfile\E not found\.$/) {
$curfile = shift;
}
+ elsif (/^dpkg-query: no path found matching pattern \Q$curfile\E\.$/) {
+ $curfile = shift;
+ }
elsif (/^(.*): \Q$curfile\E$/) {
my @pkgs = split /, /, $1;
if (@pkgs==1) { $packages{$pkgs[0]} = 1; }
