X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=0bde0d2cd010623bc34dfd551989a45336369b61;hb=cc91428ca79b3cdfdc7733505384f5983ad6c7fa;hp=04d62e4b55b02c3c23820cb3761c047b44af99e1;hpb=77727aa5c288b8b34cb0e05cea45a367fa1f9b6c;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 04d62e4b..0bde0d2c 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -116,8 +116,9 @@ sub start
 	$self->{wwvfilter} = Filter::read_in('wwv', $call);
 	$self->{annfilter} = Filter::read_in('ann', $call);
 	
-	# set unbuffered
+	# set unbuffered and no echo
 	$self->send_now('B',"0");
+	$self->send_now('E',"0");
 	
 	# send initialisation string
 	if (!$self->{outbound}) {