X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtout.pm;h=86ab0e86562269b4dfe47b8317a7b646fb432a31;hb=9630876e30f288575b5343ec2d0b5bb6d67f92cc;hp=47d44c92c339e39a58c8b6076dfaf894619a57e9;hpb=8e0eef80216fbb2bca3606daf5797e39b2889d7a;p=spider.git

diff --git a/perl/DXProtout.pm b/perl/DXProtout.pm
index 47d44c92..86ab0e86 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^";
 }
 
 #