X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXDb.pm;h=81d21928334ea81e15848eed639f58b3225cb062;hb=refs%2Fheads%2Fnewdisc;hp=833640f5862b2d5dfa75a7b1666a35e53336ab6e;hpb=dce19df96e5dab964cd89cab9c33af470d824109;p=spider.git diff --git a/perl/DXDb.pm b/perl/DXDb.pm index 833640f5..81d21928 100644 --- a/perl/DXDb.pm +++ b/perl/DXDb.pm @@ -49,12 +49,6 @@ $lastprocesstime = time; $nextstream = 0; %stream = (); -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; - # allocate a new stream for this request sub newstream {