X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FLRU.pm;h=d86c36d55a58ea1a82b7f292f8c885330fffec68;hb=c32a58cabf09c72dd08efca7ff5c49a0adfce71e;hp=30b264a525c1ec4afb17d4705d91f8e90ca136de;hpb=03c2eda593235d8299fa285827d0caade6fe8fc1;p=spider.git

diff --git a/perl/LRU.pm b/perl/LRU.pm
index 30b264a5..d86c36d5 100644
--- a/perl/LRU.pm
+++ b/perl/LRU.pm
@@ -3,7 +3,7 @@
 #
 # Copyright (c) 2002 Dirk Koopman, Tobit Computer Co Ltd 
 #
-# $Id$
+#
 #
 # The structure of the objects stored are:-
 #
@@ -26,12 +26,6 @@ use DXDebug;
 use vars qw(@ISA);
 @ISA = qw(Chain);
 
-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;
-
 sub newbase
 {
 	my $pkg = shift;