# If we want to bold the search terms...
    if ($search_bold) {
        foreach $term (@search_terms) {
# This reg expression will do the trick, and doesn't bold things inside <> tags such as 
# URL's.
            $link_results     =~ s,(<[^>]+>)|(\Q$term\E),defined($1) ? $1 : "<b>$2</b>",gie;
        }
    }

##</code><code>##

# Print out the HTML results.                  
    &site_html_search_results;
}

##</code><code>##


sub site_html_search_results {
# ---------------------------------------------
# This routine displays the search results.
# 
    my $term    = &urlencode ($in{'query'});
    &html_print_headers;
    print &load_template ('search_results.html', {
                   lookup => $lookup_results,
                   antsym => $lookup_antsym,
                   term => $term,
                   ignored_word => $ignored_word,
                   link_results => $link_results,
                   category_results => $category_results,
                   prev => $prev,
                   next => $next,
                   cat_hits => $cat_hits,
                   cat => $cat_clean,
                   link_hits => $link_hits,
	      title_linked => $title_linked,
	      displaying => $displaying,
	      results_page => $results_page,
	      csearch_results => $csearch_results, 
                   %in,
                   %globals
                   });
}