generate a lib/Tak/STDIONode.pm containing relevant fatpacked stuff

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

diff --git a/lib/Tak/ConnectorService.pm b/lib/Tak/ConnectorService.pm
index 7e1d4b1..b9f59d1 100644 (file)
--- a/lib/Tak/ConnectorService.pm
+++ b/lib/Tak/ConnectorService.pm
@@ -6,6 +6,7 @@ use Tak::Router;
 use Tak::Client;
 use Tak::ConnectionService;
 use Net::OpenSSH;
+use Tak::STDIONode;
 use Moo;
 
 with 'Tak::Role::Service';
@@ -18,7 +19,7 @@ sub handle_create {
   my ($self, $on, %args) = @_;
   my $log_level = $args{log_level}||'info';
   my ($kid_in, $kid_out, $kid_pid) = $self->_open($on, $log_level);
-  $kid_in->print(io('maint/mk-fat |')->all, "__END__\n");
+  $kid_in->print($Tak::STDIONode::DATA, "__END__\n");
   # Need to get a handshake to indicate STDIOSetup has finished
   # messing around with file descriptors, otherwise we can severely
   # confuse things by sending before the dup.