X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FObject%2FRemote%2FModuleSender.pm;h=6fe0927e58ab5f46c0c0a8f5329b3831f0d281a7;hb=f225a19938aca6ee9f1effd7d0eb64e90657e30f;hp=0129b88ed8308eef57daaf2fa24d60eabe5bb99c;hpb=7462160ed87d1eb2c10cb4c9e37e51dbdcb4d3f4;p=scpubgit%2FObject-Remote.git

diff --git a/lib/Object/Remote/ModuleSender.pm b/lib/Object/Remote/ModuleSender.pm
index 0129b88..6fe0927 100644
--- a/lib/Object/Remote/ModuleSender.pm
+++ b/lib/Object/Remote/ModuleSender.pm
@@ -8,8 +8,10 @@ use Moo;
 has dir_list => (is => 'lazy');
 
 sub _build_dir_list {
-  my %core = map +($_ => 1), @Config{qw(privlibexp archlibexp)};
-  [ grep !/$Config{archname}$/, grep !$core{$_}, @INC ];
+  my %core = map +($_ => 1), grep $_, @Config{
+    qw(privlibexp archlibexp vendorarchexp sitearchexp)
+  };
+  [ grep !$core{$_}, @INC ];
 }
 
 sub source_for {