--- trunk/lib/WebPAC/Output/KinoSearch.pm 2007/10/31 00:26:45 924 +++ trunk/lib/WebPAC/Output/KinoSearch.pm 2007/10/31 00:38:38 925 @@ -132,7 +132,7 @@ $log->logdie("need id") unless defined $id; $log->logdie("need ds") unless $ds; - $log->debug("id: $id ds = ",dump($ds)); + $log->debug("id: $id ds = ", sub { dump($ds) }); my $hash = $self->ds_to_hash( $ds, 'search' ) || return;