marvin at rectangular
Jul 15, 2008, 5:23 PM
Post #1 of 1
(193 views)
Permalink
|
|
r3597 - trunk/perl/sample
|
|
Author: creamyg
Date: 2008-07-15 17:23:36 -0700 (Tue, 15 Jul 2008)
New Revision: 3597
Modified:
trunk/perl/sample/search.cgi
Log:
Cosmetic change to sample/search.cgi.
Modified: trunk/perl/sample/search.cgi
===================================================================
--- trunk/perl/sample/search.cgi 2008-07-15 21:00:50 UTC (rev 3596)
+++ trunk/perl/sample/search.cgi 2008-07-16 00:23:36 UTC (rev 3597)
@@ -39,18 +39,19 @@
# Create result list.
my $report = '';
while ( my $hit = $hits->fetch_hit ) {
- my $score = sprintf( "%0.3f", $hit->get_score );
- my $title = encode_entities( $hit->{title} );
+ my $score = sprintf( "%0.3f", $hit->get_score );
+ my $title = encode_entities( $hit->{title} );
+ my $excerpt = $highlighter->create_excerpt($hit);
$report .= qq|
<p>
<a href="$hit->{url}"><strong>$title</strong></a>
<em>$score</em>
- <br>
- | . $highlighter->create_excerpt( $hit ) . qq|
- <br>
+ <br />
+ $excerpt
+ <br />
<span class="excerptURL">$hit->{url}</span>
</p>
- |;
+ |;
}
#--------------------------------------------------------------------------#
_______________________________________________
kinosearch-commits mailing list
kinosearch-commits [at] rectangular
http://www.rectangular.com/mailman/listinfo/kinosearch-commits
|
