--- Webpacus/lib/Webpacus/Model/WebPAC.pm 2005/11/22 14:45:12 99 +++ Webpacus/lib/Webpacus/Model/WebPAC.pm 2005/11/22 14:45:17 100 @@ -85,10 +85,10 @@ $c->config->{webpac}->{out_encoding} ); - $log->debug("converting encoding from webpac_encoding '" , - $c->config->{webpac}->{webpac_encoding}, - "' to '", - $c->config->{webpac}->{out_encoding}, + $log->debug("converting encoding from webpac_encoding '" . + $c->config->{webpac}->{webpac_encoding} . + "' to '" . + $c->config->{webpac}->{out_encoding} . "'" ); @@ -113,6 +113,8 @@ $log->debug("loading " . ($#results + 1) . " results"); + my @html_results; + for my $i ( 0 .. $#results ) { my $mfn = $1 if ( $results[$i]->{'@uri'} =~ m#/(\d+)$#); @@ -120,14 +122,19 @@ # $log->debug("load_ds( $mfn )"); my $ds = $self->{db}->load_ds( $mfn ) || next; - $results[$i]->{ html } = $self->{iconv}->convert( - $self->{out}->apply( + + my $html = $self->{out}->apply( template => $template_filename, data => $ds, - ) ); + ); + + $html = $self->{iconv}->convert( $html ) || $log->error("can't convert: $html"); + + push @html_results, $html; + } - return \@results; + return \@html_results; }