diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-12 17:41:49 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-12 17:41:49 +0000 |
| commit | 3d4a255cbdf51bdaf16ab1a302f453e90e07602f (patch) | |
| tree | 8f64863dea01c07d7cd32d64f54b6bd51ece572f /lib/Memoize/AnyDBM_File.pm | |
| parent | 9bf12eaf439552772b53d65e2dd335097dac1a84 (diff) | |
| download | perl-3d4a255cbdf51bdaf16ab1a302f453e90e07602f.tar.gz | |
Upgrade to Memoize 0.66.
p4raw-id: //depot/perl@12006
Diffstat (limited to 'lib/Memoize/AnyDBM_File.pm')
| -rw-r--r-- | lib/Memoize/AnyDBM_File.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Memoize/AnyDBM_File.pm b/lib/Memoize/AnyDBM_File.pm index 89ef0e13d6..91f960962f 100644 --- a/lib/Memoize/AnyDBM_File.pm +++ b/lib/Memoize/AnyDBM_File.pm @@ -19,6 +19,8 @@ my $verbose = 1; my $mod; for $mod (@ISA) { # (my $truemod = $mod) =~ s/^Memoize:://; +# my $file = "$mod.pm"; +# $file =~ s{::}{/}g; if (eval "require $mod") { print STDERR "AnyDBM_File => Selected $mod.\n" if $Verbose; @ISA = ($mod); # if we leave @ISA alone, warnings abound |