X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=411b33b456bf1986abf705386f68d1415cf57f75;hb=47bc13ac2b52dd67972c24017d7f6a41ac601611;hp=cb49f7980b39d2daadc002f044fba35619917e2a;hpb=407d9a80a8af1fa6c1ae2c8fbca833e49da6e816;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);