Changeset 2584
- Timestamp:
- 03/06/10 22:02:13 (2 years ago)
- Location:
- Search-Tools/trunk
- Files:
-
- 24 edited
-
Changes (modified) (1 diff)
-
lib/Search/Tools.pm (modified) (1 diff)
-
lib/Search/Tools/HeatMap.pm (modified) (1 diff)
-
lib/Search/Tools/HiLiter.pm (modified) (3 diffs)
-
lib/Search/Tools/Keywords.pm (modified) (1 diff)
-
lib/Search/Tools/MethodMaker.pm (modified) (1 diff)
-
lib/Search/Tools/Object.pm (modified) (1 diff)
-
lib/Search/Tools/Query.pm (modified) (1 diff)
-
lib/Search/Tools/QueryParser.pm (modified) (1 diff)
-
lib/Search/Tools/RegEx.pm (modified) (1 diff)
-
lib/Search/Tools/RegExp.pm (modified) (1 diff)
-
lib/Search/Tools/RegExp/Keyword.pm (modified) (1 diff)
-
lib/Search/Tools/RegExp/Keywords.pm (modified) (1 diff)
-
lib/Search/Tools/Snipper.pm (modified) (1 diff)
-
lib/Search/Tools/SpellCheck.pm (modified) (1 diff)
-
lib/Search/Tools/Token.pm (modified) (1 diff)
-
lib/Search/Tools/TokenList.pm (modified) (1 diff)
-
lib/Search/Tools/TokenListPP.pm (modified) (1 diff)
-
lib/Search/Tools/TokenListUtils.pm (modified) (1 diff)
-
lib/Search/Tools/TokenPP.pm (modified) (1 diff)
-
lib/Search/Tools/Tokenizer.pm (modified) (1 diff)
-
lib/Search/Tools/Transliterate.pm (modified) (1 diff)
-
lib/Search/Tools/UTF8.pm (modified) (1 diff)
-
lib/Search/Tools/XML.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
Search-Tools/trunk/Changes
r2579 r2584 249 249 * change QueryParser tests for range to use native dialect, not SWISH. 250 250 251 0.46 xxx 252 * fix croak message for debug-level sanity check on text match in HiLiter. 253 -
Search-Tools/trunk/lib/Search/Tools.pm
r2579 r2584 5 5 use Carp; 6 6 7 our $VERSION = '0.4 5';7 our $VERSION = '0.46'; 8 8 9 9 use XSLoader; -
Search-Tools/trunk/lib/Search/Tools/HeatMap.pm
r2579 r2584 6 6 use base qw( Search::Tools::Object ); 7 7 8 our $VERSION = '0.4 5';8 our $VERSION = '0.46'; 9 9 10 10 # debuggin only -
Search-Tools/trunk/lib/Search/Tools/HiLiter.pm
r2579 r2584 7 7 use Search::Tools::UTF8; 8 8 9 our $VERSION = '0.4 5';9 our $VERSION = '0.46'; 10 10 11 11 my $XML = Search::Tools::XML->new; … … 370 370 "plain hiliter looking for: $re against '$query' in '$text'"; 371 371 372 # because s// fails to find duplicate instances like 'foo foo'372 # because s/// fails to find duplicate instances like 'foo foo' 373 373 # we use a while loop and increment pos() 374 374 … … 377 377 378 378 if ( $self->debug ) { 379 if ( $text =~ m/\Q$query\E/i && $text !~ m/$re/ ) { 380 croak "bad regex for '$query': $re"; 379 if ( $text =~ m/\b\Q$query\E\b/i && $text !~ m/$re/i ) { 380 my ($snip) = ( $text =~ m/(.....\Q$query\E.....)/gi ); 381 croak "bad regex for '$query' [$snip]: $re"; 381 382 } 382 383 } -
Search-Tools/trunk/lib/Search/Tools/Keywords.pm
r2579 r2584 5 5 use base qw( Search::Tools::QueryParser ); 6 6 7 our $VERSION = '0.4 5';7 our $VERSION = '0.46'; 8 8 9 9 # this is backcompat class only. -
Search-Tools/trunk/lib/Search/Tools/MethodMaker.pm
r2579 r2584 7 7 use base qw( Rose::ObjectX::CAF::MethodMaker ); 8 8 9 our $VERSION = '0.4 5';9 our $VERSION = '0.46'; 10 10 11 11 =head1 NAME -
Search-Tools/trunk/lib/Search/Tools/Object.pm
r2579 r2584 7 7 use Search::Tools::MethodMaker; 8 8 9 our $VERSION = '0.4 5';9 our $VERSION = '0.46'; 10 10 11 11 __PACKAGE__->mk_accessors(qw( debug )); -
Search-Tools/trunk/lib/Search/Tools/Query.pm
r2579 r2584 11 11 use Search::Tools::RegEx; 12 12 13 our $VERSION = '0.4 5';13 our $VERSION = '0.46'; 14 14 15 15 __PACKAGE__->mk_ro_accessors( -
Search-Tools/trunk/lib/Search/Tools/QueryParser.pm
r2579 r2584 13 13 use Search::Tools::RegEx; 14 14 15 our $VERSION = '0.4 5';15 our $VERSION = '0.46'; 16 16 17 17 my $XML = Search::Tools::XML->new(); -
Search-Tools/trunk/lib/Search/Tools/RegEx.pm
r2579 r2584 7 7 #use Data::Dump qw( dump ); 8 8 9 our $VERSION = '0.4 5';9 our $VERSION = '0.46'; 10 10 11 11 __PACKAGE__->mk_ro_accessors( -
Search-Tools/trunk/lib/Search/Tools/RegExp.pm
r2579 r2584 8 8 use Search::Tools::RegExp::Keyword; 9 9 10 our $VERSION = '0.4 5';10 our $VERSION = '0.46'; 11 11 12 12 __PACKAGE__->mk_accessors(qw( kw )); -
Search-Tools/trunk/lib/Search/Tools/RegExp/Keyword.pm
r2579 r2584 5 5 use base qw( Search::Tools::Object ); 6 6 7 our $VERSION = '0.4 5';7 our $VERSION = '0.46'; 8 8 9 9 __PACKAGE__->mk_ro_accessors(qw( plain html word phrase )); -
Search-Tools/trunk/lib/Search/Tools/RegExp/Keywords.pm
r2579 r2584 14 14 ); 15 15 16 our $VERSION = '0.4 5';16 our $VERSION = '0.46'; 17 17 18 18 sub keywords { -
Search-Tools/trunk/lib/Search/Tools/Snipper.pm
r2579 r2584 13 13 use base qw( Search::Tools::Object ); 14 14 15 our $VERSION = '0.4 5';15 our $VERSION = '0.46'; 16 16 17 17 # extra space here so pmvers works against $VERSION -
Search-Tools/trunk/lib/Search/Tools/SpellCheck.pm
r2579 r2584 7 7 use Search::Tools::QueryParser; 8 8 9 our $VERSION = '0.4 5';9 our $VERSION = '0.46'; 10 10 11 11 __PACKAGE__->mk_accessors( -
Search-Tools/trunk/lib/Search/Tools/Token.pm
r2579 r2584 10 10 use Search::Tools; # XS required 11 11 12 our $VERSION = '0.4 5';12 our $VERSION = '0.46'; 13 13 14 14 1; -
Search-Tools/trunk/lib/Search/Tools/TokenList.pm
r2579 r2584 11 11 use base qw( Search::Tools::TokenListUtils ); 12 12 13 our $VERSION = '0.4 5';13 our $VERSION = '0.46'; 14 14 15 15 1; -
Search-Tools/trunk/lib/Search/Tools/TokenListPP.pm
r2579 r2584 10 10 use base qw( Search::Tools::TokenListUtils ); 11 11 12 our $VERSION = '0.4 5';12 our $VERSION = '0.46'; 13 13 14 14 __PACKAGE__->mk_accessors(qw( pos num )); -
Search-Tools/trunk/lib/Search/Tools/TokenListUtils.pm
r2579 r2584 4 4 use Carp; 5 5 6 our $VERSION = '0.4 5';6 our $VERSION = '0.46'; 7 7 8 8 =head1 NAME -
Search-Tools/trunk/lib/Search/Tools/TokenPP.pm
r2579 r2584 9 9 fallback => 1; 10 10 11 our $VERSION = '0.4 5';11 our $VERSION = '0.46'; 12 12 13 13 __PACKAGE__->mk_accessors( -
Search-Tools/trunk/lib/Search/Tools/Tokenizer.pm
r2579 r2584 9 9 use Carp; 10 10 11 our $VERSION = '0.4 5';11 our $VERSION = '0.46'; 12 12 13 13 __PACKAGE__->mk_accessors(qw( re )); -
Search-Tools/trunk/lib/Search/Tools/Transliterate.pm
r2579 r2584 13 13 __PACKAGE__->mk_ro_accessors(qw( map )); 14 14 15 our $VERSION = '0.4 5';15 our $VERSION = '0.46'; 16 16 17 17 =pod -
Search-Tools/trunk/lib/Search/Tools/UTF8.pm
r2579 r2584 28 28 our $Debug = ( $ENV{PERL_DEBUG} && $ENV{PERL_DEBUG} > 2 ) ? 1 : 0; 29 29 30 our $VERSION = '0.4 5';30 our $VERSION = '0.46'; 31 31 32 32 sub to_utf8 { -
Search-Tools/trunk/lib/Search/Tools/XML.pm
r2579 r2584 6 6 use Search::Tools; # XS required 7 7 8 our $VERSION = '0.4 5';8 our $VERSION = '0.46'; 9 9 10 10 =pod
Note: See TracChangeset
for help on using the changeset viewer.