X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=bin%2Fremoterepl;fp=bin%2Fremoterepl;h=254fa15b369b395f6113e33b5c123262fcf75869;hp=f7bae7a7f83e30f14bd7c61da89cac77dbcb3332;hb=8892aa5c492c59969d83045576a49f2c031dbfc8;hpb=beaee5a1ec2d8d70222163de995aa99adff0f052

diff --git a/bin/remoterepl b/bin/remoterepl
index f7bae7a..254fa15 100755
--- a/bin/remoterepl
+++ b/bin/remoterepl
@@ -15,7 +15,7 @@ $SIG{INT} = sub { warn "SIGINT\n" };
 
 #{ no warnings 'once'; $Object::Remote::Connection::DEBUG = 1; }
 
-my $eval = Eval::WithLexicals->new::on($ARGV[0]);
+my $eval = Eval::WithLexicals->new::on($ARGV[0]||'-');
 
 my $read = Term::ReadLine->new('Perl REPL');
 while (1) {