--- trunk/run.pl	2006/10/25 18:54:45	762
+++ trunk/run.pl	2006/10/25 21:01:51	765
@@ -396,7 +396,7 @@
 		my $lookup_data = WebPAC::Normalize::_get_lookup();
 
 		if (defined( $lookup_data->{$database}->{$input_name} )) {
-			$log->debug("created following lookups: ", dump( $lookup_data ));
+			$log->debug("created following lookups: ", sub { dump( $lookup_data ) } );
 
 			foreach my $key (keys %{ $lookup_data->{$database}->{$input_name} }) {
 				$store->save_lookup(
@@ -500,7 +500,7 @@
 				},
 			);
 
-			$log->debug("ds = ",dump($ds)) if ($ds);
+			$log->debug("ds = ", sub { dump($ds) }) if ($ds);
 
 			$store->save_ds(
 				database => $database,