hmmm i am using many many many mods in my Board - are there any Mods that will not work after this patch ?
*edit*
complte sub with who is online mod
Quote:sub WriteLog {
fopen(FILE, "$memberdir/$username.hm");
@hideme = <FILE>;
fclose(FILE);
my($curentry, $name);
my $field = $username;
if($field eq "Guest") { $field = "$user_ip"; }
## WHOSON MOD START ##
fopen(LOG, "$vardir/log.txt");
my @online = <LOG>;
fclose(LOG);
fopen(LOG, ">$vardir/log.txt");
if ($hideme[0] == 1){
print LOG rname'}\|$INFO{'num'}|$user_ip|1\n";
}
else{
print LOG rname'}\|$INFO{'num'}|$user_ip\n";
}
foreach $curentry (@online) {
$curentry =~ s/\n//g;
($name, $value, $name1, $name2, $name3, $name4, $name5, $name6, $ipinfo) = split(/\|/, $curentry);
$date1 = "$value";
$date2 = "$logdate";
&calctime;
if($name ne $field && $result <= $OnlineLogTime && $result >= 0) { print LOG "$curentry\n"; }
if(-e "$memberdir/$name.dat" && $result > $OnlineLogTime) {&WriteLastOnline($name, $date, "x", "x");}
}
fclose(LOG);
## WHOSON MOD END ##
fopen(LOG, "+<$vardir/clicklog.txt",1);
my @entries = <LOG>;
seek LOG, 0, 0;
truncate LOG, 0;
print LOG ";
foreach $curentry (@entries) {
$curentry =~ s/\n//g;
chomp $curentry;
($name, $date1, $dummy) = split(/\|/, $curentry);
$date2 = $date;
chomp $date1;
chomp $date2;
&calctime;
if($result <= $ClickLogTime && $result >= 0) { print LOG "$curentry\n"; }
}
fclose(LOG);
}