view release on metacpan or  search on metacpan

CLucene.pm  view on Meta::CPAN

	CLuceneWrap::CL_Hightlight1($this->{resource}, $text, $text_is_filename);
}

sub highlight_x
{
	my $this = shift;
	my %arg = @_;
	my $text = $arg{text} || confess "text unset";
	my $text_is_filename = $arg{text_is_filename} ? 1 : 0;
	my $sep = $arg{separator} || confess;
	my $max_frags = $arg{max_fragments} || 3;
	my $fragment_size = $arg{fragment_size} || confess;
	my $type = int($arg{type});
	my $html_start = $arg{html_start} || confess;
	my $html_end = $arg{html_end} || confess;
	CLuceneWrap::CL_Hightlight1($this->{resource}, $text, $text_is_filename, $sep, $max_frags, $fragment_size, $type, $html_start, $html_end);
}

# values for flag byte entries
sub NORMAL_FIELD		{ 0 } ;
sub REQUIRED_FIELD	{ 1 } ;
sub PROHIBITED_FIELD	{ 2 } ;

#---

# set if set

clucene.i  view on Meta::CPAN

#ifdef HIGHLIGHTING
char highlightbuf[50000];

char * CL_Highlight1(int resource, char * text, int text_is_filename)
{
	CL_HIGHLIGHT(resource, text, text_is_filename, highlightbuf, (sizeof highlightbuf)-1);
	return highlightbuf;
}

char * CL_Highlight_X1(int resource, char * text, int text_is_filename, char * separator, int max_fragments, int fragment_size, int type, char * html_start, char * html_end)
{
	CL_HIGHLIGHT_X(resource, text, text_is_filename, highlightbuf, (sizeof highlightbuf)-1, separator, max_fragments, fragment_size, type, html_start, html_end);
	return highlightbuf;
}
#endif

%}