Make Panda::Builder copy over all the files it doesn't recognize

colomon · Nov 26, 2012 · 4c73acb · 4c73acb
1 parent 6b9161c
commit 4c73acb
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 4 deletions.
diff --git a/lib/Panda/Builder.pm b/lib/Panda/Builder.pm
@@ -36,16 +36,15 @@ class Panda::Builder does Pies::Builder {
         my $workdir = $!resources.workdir($p);
         return unless "$workdir/lib".IO ~~ :d;
         indir $workdir, {
-            my @files = find(dir => 'lib',
-                             name => /\.p(m6?|od)$/).list;
+            my @files = find(dir => 'lib', type => 'file').list;
             my @dirs = @files.map(*.dir).uniq;
             mkpath "blib/$_" for @dirs;
 
             my @tobuild = self.build-order(@files);
             withp6lib {
                 for @tobuild -> $file {
                     $file.IO.copy: "blib/{$file.dir}/{$file.name}";
-                    next if $file ~~ /\.pod$/;
+                    next unless $file ~~ /\.pm6?$/;
                     say "Compiling $file";
                     shell "$*EXECUTABLE_NAME --target=pir "
                         ~ "--output=blib/{$file.dir}/"

diff --git a/t/panda/builder.t b/t/panda/builder.t
@@ -3,7 +3,7 @@ use Panda::Builder;
 use Panda::Resources;
 use Shell::Command;
 
-plan 5;
+plan 6;
 
 my $srcdir = 'testmodules';
 
@@ -19,6 +19,8 @@ ok "$srcdir/dummymodule/blib/lib/foo.pir".IO ~~  :f, 'module compiled';
 ok "$srcdir/dummymodule/blib/lib/foo.pm".IO ~~   :f, 'and opied to blib';
 ok "$srcdir/dummymodule/blib/lib/manual.pod".IO ~~  :f, 'pod copied too';
 ok "$srcdir/dummymodule/blib/lib/bar.pir".IO !~~ :f, 'pod not compiled';
+ok "$srcdir/dummymodule/blib/lib/foo.js".IO ~~ :f,
+   'random files also copied to blib';
 
 rm_rf "$srcdir/dummymodule/blib";
 

diff --git a/testmodules/dummymodule/lib/foo.js b/testmodules/dummymodule/lib/foo.js