X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FTak%2FRole%2FScriptActions.pm;h=2d4a23acb0a7fa707b646dd1a74afda25526f2cd;hb=71be58607e0088aeb6ac6c0b07418a43b46e6aa5;hp=9551b62c4f3b2138e85b815f5dc1c574b745407e;hpb=5c11b21f3091458cf787667ec338fb0a31a17027;p=scpubgit%2FTak.git diff --git a/lib/Tak/Role/ScriptActions.pm b/lib/Tak/Role/ScriptActions.pm index 9551b62..2d4a23a 100644 --- a/lib/Tak/Role/ScriptActions.pm +++ b/lib/Tak/Role/ScriptActions.pm @@ -59,7 +59,10 @@ sub each_repl (I=s@;m=s@;M=s@) { my ($self, $remote, $options) = @_; require Tak::REPL; require B; - $remote->ensure(eval_service => 'Tak::EvalService'); + $remote->ensure( + eval_service => 'Tak::EvalService', + expose => { service_client => [ '' ] }, + ); foreach my $lib (@{$options->{'I'}||[]}) { $remote->do(eval_service => eval => "lib->import(${\B::perlstring($lib)})"); }