summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Memoize.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Memoize.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/Memoize.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/Master/tlpkg/tlperl/lib/Memoize.pm b/Master/tlpkg/tlperl/lib/Memoize.pm
index 9a58c4ac743..f4e6522d483 100644
--- a/Master/tlpkg/tlperl/lib/Memoize.pm
+++ b/Master/tlpkg/tlperl/lib/Memoize.pm
@@ -9,7 +9,7 @@
# write to mjd-perl-memoize+@plover.com for a license.
package Memoize;
-$VERSION = '1.03';
+$VERSION = '1.03_01';
# Compile-time constants
sub SCALAR () { 0 }
@@ -184,7 +184,11 @@ sub _my_tie {
}
my $modulefile = $module . '.pm';
$modulefile =~ s{::}{/}g;
- eval { require $modulefile };
+ eval {
+ local @INC = @INC;
+ pop @INC if $INC[-1] eq '.';
+ require $modulefile
+ };
if ($@) {
croak "Memoize: Couldn't load hash tie module `$module': $@; aborting";
}