Clicklog Bug Fix 1.0 - sp1 This mod fixes the Clicklog date rollover bug The bug prevents some entries in the clicklog from being deleted, resulting in VERY large clicklogs! BHRA Webmaster http://www.bhra.org.uk/ Sources/Subs.pl sub calctime { # Input: $date1 $date2 my( $dummy, $times, $hour, $min, $sec, $number1, $number2 ); ($dummy, $times) = split(/ $txt{'107'} /, $date1); ($hour, $min, $sec) = split(/\:/, $times); $number1 = ($hour*60)+$min+($sec/60); ($dummy, $times) = split(/ $txt{'107'} /, $date2); ($hour, $min, $sec) = split(/\:/, $times); $number2 = ($hour*60)+$min+($sec/60); $result = $number2-$number1; } sub calctime { # Input: $date1 $date2 my( $dummy, $times, $hour, $min, $sec, $number1, $number2, $day1, $day2 ); ($day1, $times) = split(/ $txt{'107'} /, $date1); ($hour, $min, $sec) = split(/\:/, $times); $number1 = ($hour*60)+$min+($sec/60); ($day2, $times) = split(/ $txt{'107'} /, $date2); ($hour, $min, $sec) = split(/\:/, $times); $number2 = ($hour*60)+$min+($sec/60); # if days are different, increase second time by 1440 mins if ($day1 ne $day2) {$number2 = $number2+1440;} $result = $number2-$number1; }