X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FRole%2FTiny.pm;h=844272f5b23ff58b878d850dfb1345a067bc7292;hb=1ba114550da04faf77252207e6df621c37d07da7;hp=ebf98079c0fbdc397a728ae5cf87b36482ca15fd;hpb=390ac4068b5bb91b4605206917c1c83548cc2dd6;p=gitmo%2FMoo.git

diff --git a/lib/Role/Tiny.pm b/lib/Role/Tiny.pm
index ebf9807..844272f 100644
--- a/lib/Role/Tiny.pm
+++ b/lib/Role/Tiny.pm
@@ -20,6 +20,7 @@ sub import {
   my $target = caller;
   my $me = $_[0];
   strictures->import;
+  return if $INFO{$target}; # already exported into this package
   # get symbol table reference
   my $stash = do { no strict 'refs'; \%{"${target}::"} };
   # install before/after/around subs