Steve Hay wrote:
This in turn seems to be due a problem in Module-ScanDeps. I'm using
version 0.75, and I find that the output of
scandeps -V C:\perl5\site\lib\DBI.pm
mentions DBI.pm but not DBI.dll. If I try the same command using version
0.54 of Module-ScanDeps then DBI.dll is mentioned in the output too.
I'll see if I can find the first version that broke and/or the cause of
the breakage, but I thought I'd post here first in case someone in the
know and having a few spare tuits is able to get there quicker.
It first broke in 0.74, and the change that breaks it is the following
change to Module::ScanDeps::scan_deps():
--- Module-ScanDeps-0.73/lib/Module/ScanDeps.pm 2007-03-25
19:18:22.000000000 +0100
+++ Module-ScanDeps-0.74/lib/Module/ScanDeps.pm 2007-04-30
19:42:42.000000000 +0100
@@ -445,6 +451,18 @@
(@_ and $_[0] =~ /^(?:$Keys)$/o) ? @_ : (files => [EMAIL PROTECTED],
recurse => 1)
);
+ if (!defined($args{keys})) {
+ $args{keys} = [map {_path_to_filename($_)} @{$args{files}}]
+ }
+
+ my ($type, $path);
+ foreach my $input_file (@{$args{files}}) {
+ $type = 'module';
+ $type = 'data' unless $input_file =~ /\.p[mh]$/io;
+ $path = $input_file;
+ _add_info($args{rv}, _path_to_filename($path), $path, undef,
$type);
+ }
+
scan_deps_static(\%args);
if ($args{execute} or $args{compile}) {
End of Patch.
Any ideas what that change is trying to do and why it has broken the
finding of DBI.dll in a command such as "scandeps -V
C:\perl5\site\lib\DBI.pm" ?
--
