X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtout.pm;h=6ee4fbcc150272d2465a4d26f3e2e28ea2c68fdf;hb=b7720ad5d9036cd35ba581c1fc196c953abadcd3;hp=47d44c92c339e39a58c8b6076dfaf894619a57e9;hpb=8e0eef80216fbb2bca3606daf5797e39b2889d7a;p=spider.git diff --git a/perl/DXProtout.pm b/perl/DXProtout.pm index 47d44c92..6ee4fbcc 100644 --- a/perl/DXProtout.pm +++ b/perl/DXProtout.pm @@ -102,8 +102,7 @@ sub pc17 # Request init string sub pc18 { - my $info = DXCluster::cluster; - return "PC18^$info^$DXProt::myprot_version^"; + return "PC18^DXSpider Version: $main::version Build: $main::build^$DXProt::myprot_version^"; } #