diff options
-rw-r--r-- | lib/Dist/CheckConflicts.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/Dist/CheckConflicts.pm b/lib/Dist/CheckConflicts.pm index 960c5ac..ac860c7 100644 --- a/lib/Dist/CheckConflicts.pm +++ b/lib/Dist/CheckConflicts.pm @@ -156,8 +156,14 @@ sub import { _check_version($HAS_CONFLICTS{$mod}, $mod); - my $i = 1; - return sub { $_ = $i-- if $i }; # the previous require already handled it + # the previous require already handled it + my $called; + return sub { + return 0 if $called; + $_ = "1;"; + $called = 1; + return 1; + }; }, \%CONFLICTS, # arbitrary but unique, see above ]; |