From 40de516a85c2873638f006944ebe98f848e1320d Mon Sep 17 00:00:00 2001 From: Alex Vandiver Date: Fri, 22 Apr 2011 15:17:25 -0400 Subject: [PATCH] Warnings avoidance for reloading a module not in %INC --- lib/Module/Refresh.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/Module/Refresh.pm b/lib/Module/Refresh.pm index d729f84..b1e16c0 100644 --- a/lib/Module/Refresh.pm +++ b/lib/Module/Refresh.pm @@ -93,7 +93,9 @@ sub refresh_module_if_modified { return $self->new if !%CACHE; my $mod = shift; - if ( !$CACHE{$mod} ) { + if (!$INC{$mod}) { + return; + } elsif ( !$CACHE{$mod} ) { $self->update_cache($mod); } elsif ( $self->mtime( $INC{$mod} ) ne $CACHE{$mod} ) { $self->refresh_module($mod);