X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FFatNode.pm;h=d93f54c7a2d089e763f45b3ffb8546ddf6a112bc;hp=1b7c659c21e5f991b959c828d812c47c14021524;hb=9a46f6c5479427e967cea4f4ea64b0be7decbd7c;hpb=961077ea7e8e6f0885392bf769e29ee4bf5ad046 diff --git a/lib/Object/Remote/FatNode.pm b/lib/Object/Remote/FatNode.pm index 1b7c659..d93f54c 100644 --- a/lib/Object/Remote/FatNode.pm +++ b/lib/Object/Remote/FatNode.pm @@ -16,7 +16,7 @@ sub stripspace { my %maybe_libs = map +($_ => 1), grep defined, (values %Config, '.'); -my @extra_libs = grep not(ref($_) or $maybe_libs{$_}), @INC; +my @extra_libs = grep -e not(ref($_) or $maybe_libs{$_}), @INC; my $extra_libs = join '', map " -I$_\n", @extra_libs;