X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fcore.pl;h=802e4c20a72da8c33dd51a4a3440f5ff4d42499d;hb=f7cae48a17d6decd0a9bd997188271daa0a885b1;hp=f42fb2be3d91bb3514148b1d77c0090768a679c9;hpb=82dfb173fbd8cb380af630839f04d63389684262;p=infobot.git diff --git a/src/core.pl b/src/core.pl index f42fb2b..802e4c2 100644 --- a/src/core.pl +++ b/src/core.pl @@ -31,7 +31,7 @@ use vars qw(@joinchan @ircServers @wingateBad @wingateNow @wingateCache ); ### hash. MUST BE REDUCED IN SIZE!!! -# +# use vars qw(%count %netsplit %netsplitservers %flood %dcc %orig %nuh %talkWho %seen %floodwarn %param %dbh %ircPort %topic %moduleAge %last %time %mask %file @@ -78,11 +78,10 @@ $nottime = 0; $notsize = 0; $notcount = 0; ### +$bot_release = "1.1.0"; if ( -d "CVS" ) { use POSIX qw(strftime); - $bot_release = strftime("cvs (%Y%m%d)", gmtime( (stat("CVS"))[9] ) ); -} else { - $bot_release = "1.0.10 (2001xxxx)"; + $bot_release .= strftime(" cvs (%Y%m%d)", gmtime( (stat("CVS"))[9] ) ); } $bot_version = "blootbot $bot_release -- $^O"; $noreply = "NOREPLY"; @@ -226,7 +225,7 @@ sub IsChanConf { return 0; } - # should we use IsParam() externally where needed or hack it in + # should we use IsParam() externally where needed or hack it in # here just in case? fix it later. if (&IsParam($param)) { &DEBUG("ICC: found '$param' option in main config file."); @@ -309,7 +308,7 @@ sub getChanConf { return 0; } - # this looks evil... + # this looks evil... if (0 and !defined $chan) { &DEBUG("gCC: ok !chan... doing _default instead."); }