From 55182a60dc956f445dd883a67c6abc334e5e109f Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Fri, 21 Jun 2013 09:41:26 -0400 Subject: oops --- lib/Dist/CheckConflicts.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/Dist/CheckConflicts.pm b/lib/Dist/CheckConflicts.pm index 03aaf80..f422537 100644 --- a/lib/Dist/CheckConflicts.pm +++ b/lib/Dist/CheckConflicts.pm @@ -3,7 +3,7 @@ use strict; use warnings; # ABSTRACT: declare version conflicts for your dist -use Exporter 'import'; +use base 'Exporter'; our @EXPORT = our @EXPORT_OK = ( qw(conflicts check_conflicts calculate_conflicts dist) ); @@ -91,6 +91,7 @@ my %HAS_CONFLICTS; my %DISTS; sub import { + my $pkg = shift; my $for = caller; my ($conflicts, $alsos, $dist); @@ -165,7 +166,7 @@ sub import { \%CONFLICTS, # arbitrary but unique, see above ]; - goto $import; + $pkg->export_to_level(1, @_); } sub _strip_opt { -- cgit v1.2.3