build fatpacked world on the fly

[scpubgit/Tak.git] / lib / Tak / WorldHandle.pm

diff --git a/lib/Tak/WorldHandle.pm b/lib/Tak/WorldHandle.pm
index 8549cc2..8a2a187 100644 (file)
--- a/lib/Tak/WorldHandle.pm
+++ b/lib/Tak/WorldHandle.pm
@@ -36,7 +36,7 @@ sub _build_router {
 
   my ($stdin, $stdout) = $self->connection->open2('perl -');
 
-  $stdin->print(io('takd')->all, "__END__\n");
+  $stdin->print(io('maint/mk-fat |')->all, "__END__\n");
 
   my $channel = Tak::JSONChannel->new(
     read_fh => $stdout, write_fh => $stdin
@@ -46,7 +46,7 @@ sub _build_router {
     channel => $channel
   );
 
-  $router->register(MODULE_SENDER => Tak::ModuleSender->new);
+  $router->register(module_sender => Tak::ModuleSender->new);
 
   return $router;
 }