X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCron.pm;h=7b9f1f30860642f826720298fdb8b21eb4d4c288;hb=619521056c1c11860004e1c8bea08d1bb23db6a4;hp=2a9913f1f9682a4a20bb62b84850c7dbbacadf96;hpb=c3c15883cf25add24fc49e32eb0d17dce6839a62;p=spider.git diff --git a/perl/DXCron.pm b/perl/DXCron.pm index 2a9913f1..7b9f1f30 100644 --- a/perl/DXCron.pm +++ b/perl/DXCron.pm @@ -27,10 +27,8 @@ my $fn = "$main::cmd/crontab"; my $localfn = "$main::localcmd/crontab"; 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; + +main::mkver($VERSION = q$Revision$); # cron initialisation / reading in cronjobs sub init