add pc92 flags to $main::me and $main::routeroot.

[spider.git] / perl / cluster.pl

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 8cb4dffbec2efa0cceab249b90bfb3baa372fe10..fe881f1eaa78a4dde7b525a227f98af3816930ab 100755 (executable)
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -462,6 +462,8 @@ DXProt->init();
 
 # put in a DXCluster node for us here so we can add users and take them away
 $routeroot = Route::Node->new($mycall, $version*100+5300, Route::here($main::me->here)|Route::conf($main::me->conf));
+$routeroot->do_pc92(1);
+$routeroot->via_pc92(1);
 
 # make sure that there is a routing OUTPUT node default file
 #unless (Filter::read_in('route', 'node_default', 0)) {