Enforce correct load order in build-standalone

mdom · Jan 20, 2019 · 05a7ae6 · 05a7ae6
1 parent 041782a
commit 05a7ae6
Showing 1 changed file with 11 additions and 4 deletions.
diff --git a/build-standalone b/build-standalone
@@ -11,8 +11,17 @@ open( my $standalone, '>', $target ) or die "Can't open target: $!\n";
 
 print {$standalone} "#!/usr/bin/perl\n";
 
-sub wanted {
-    return unless -f;
+my @libraries = (
+    qw(
+      lib/App/termpub/Pager.pm
+      lib/App/termpub/Renderer.pm
+      lib/App/termpub/Epub.pm
+      lib/App/termpub/Epub/Chapter.pm
+      lib/App/termpub.pm
+      )
+);
+
+for ( @libraries ) {
     open( my $fh, '<', $_ )
       or die "Can't open $_: $!\n";
     while (<$fh>) {
@@ -24,8 +33,6 @@ sub wanted {
     }
 }
 
-finddepth( \&wanted, 'lib' );
-
 my $script = 'script/termpub';
 
 open( my $fh, '<', $script ) or die "Can't open $script: $!\n";