X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FTimer.pm;h=fb429f643537d40cd204b367c93ed5f962cd74df;hb=f63d598af3f797b56b8d5e23ec4ff5254192eee9;hp=168dd3f5fcb5490fe65e7d636b7ba401d32c34eb;hpb=2a7a2a84545e6e3f987bef9f55da82943343a434;p=spider.git diff --git a/perl/Timer.pm b/perl/Timer.pm index 168dd3f5..fb429f64 100644 --- a/perl/Timer.pm +++ b/perl/Timer.pm @@ -3,7 +3,7 @@ # # This uses callbacks. BE CAREFUL!!!! # -# $Id$ +# # # Copyright (c) 2001 Dirk Koopman G1TLH # @@ -16,12 +16,6 @@ use DXDebug; @timerchain = (); $notimers = 0; -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; - $lasttime = 0; sub new