--- trunk/vhost/webpac2.cgi 2009/04/25 17:11:33 1165 +++ trunk/vhost/webpac2.cgi 2009/04/25 17:12:43 1166 @@ -237,6 +237,8 @@ while ( my $result = $swish_results->next_result ) { my $data = from_json $result->property('data'); + dump_yaml( 'data', $data ); + print qq|
  • |; foreach my $attr ( @attr ) { next unless defined $data->{$attr};