X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FThingy.pm;h=86bb5f1d0aa2c66cb3e45293bd99920eeff45623;hb=refs%2Fheads%2Fnewusers;hp=61068e06b2f7e5df80cd4275b33627eca633edd6;hpb=849e28c79f3d3e19db3429f965b10426362fe04f;p=spider.git diff --git a/perl/Thingy.pm b/perl/Thingy.pm index 61068e06..86bb5f1d 100644 --- a/perl/Thingy.pm +++ b/perl/Thingy.pm @@ -3,7 +3,7 @@ # # This is the new fundamental protocol engine handler # -# $Id$ +# # # Copyright (c) 2004 Dirk Koopman G1TLH # @@ -12,12 +12,6 @@ use strict; package Thingy; -use vars qw($VERSION $BRANCH); -$VERSION = sprintf( "%d.%03d", q$Revision$ =~ /(\d+)\.(\d+)/ ); -$BRANCH = sprintf( "%d.%03d", q$Revision$ =~ /\d+\.\d+\.(\d+)\.(\d+)/ || (0,0)); -$main::build += $VERSION; -$main::branch += $BRANCH; - use DXChannel; use DXDebug;