diff options
-rw-r--r-- | lib/Carton/Packer.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Carton/Packer.pm b/lib/Carton/Packer.pm index 333aa09..dc1a2cf 100644 --- a/lib/Carton/Packer.pm +++ b/lib/Carton/Packer.pm @@ -84,7 +84,9 @@ sub installed_meta { } }; - File::Find::find({ wanted => $finder, no_chdir => 1 }, grep -d, map "$_/.meta", @INC); + my @meta_dirs = grep -d, map "$_/.meta", @INC; + File::Find::find({ wanted => $finder, no_chdir => 1 }, @meta_dirs) + if @meta_dirs; # return the latest version @meta = sort { version->new($b->version) cmp version->new($a->version) } @meta; |