X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=411b33b456bf1986abf705386f68d1415cf57f75;hb=579810d363939640538f88a9caa86e01fe9c7709;hp=cb49f7980b39d2daadc002f044fba35619917e2a;hpb=5b803645eaf1a462937d7cde0e9459f1a6d3f10e;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index cb49f798..411b33b4 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -238,6 +238,9 @@ sub start
 	$self->{here} = 1;
 	$self->{width} = 80;
 
+	# sort out registration
+	$self->{registered} = 1;
+
 	# get the output filters
 	$self->{spotsfilter} = Filter::read_in('spots', $call, 0) || Filter::read_in('spots', 'node_default', 0);
 	$self->{wwvfilter} = Filter::read_in('wwv', $call, 0) || Filter::read_in('wwv', 'node_default', 0);