X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;fp=perl%2FDXMsg.pm;h=7a433e2175f8170d1f883be2a2aef13613807803;hb=b9dffeff7239952814342dad19db3a51def6fab7;hp=fe65cdb3b204667d1931113c4036f6583fcd56a8;hpb=602b4bd771f6476eda740a64a8c83c687abf4572;p=spider.git diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index fe65cdb3..7a433e21 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -32,12 +32,6 @@ eval { use strict; -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 vars qw(%work @msg $msgdir %valid %busy $maxage $last_clean $residencetime @badmsg @swop $swopfn $badmsgfn $forwardfn @forward $timeout $waittime $email_server $email_prog $email_from