--- trunk/lib/WebPAC/Store.pm 2006/10/08 13:00:04 749 +++ trunk/lib/WebPAC/Store.pm 2006/10/25 20:53:48 764 @@ -331,8 +331,10 @@ $path .= "/" . $args->{key}; + my $t = time(); + if (store $args->{data}, $path) { - $log->info("saved lookup $path"); + $log->info(sprintf("saved lookup $path in %.2fs", time() - $t)); return 1; } else { $log->logwarn("can't save lookup to $path: $!");