--- trunk/lib/WebPAC/Output/JSON.pm 2007/10/30 21:57:36 917 +++ trunk/lib/WebPAC/Output/JSON.pm 2007/10/31 00:38:38 925 @@ -79,7 +79,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) }); push @{ $self->{_data} }, $self->ds_to_hash( $ds, 'display' );