You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by ma...@apache.org on 2010/11/04 06:36:56 UTC

[lucy-commits] svn commit: r1030838 [7/12] - in /incubator/lucy/trunk: ./ clownfish/lib/Clownfish/Binding/ clownfish/lib/Clownfish/Binding/Core/ clownfish/lib/Clownfish/Binding/Perl/ core/KinoSearch/ core/Lucy/ core/Lucy/Analysis/ core/Lucy/Docs/ core/Lucy/Document/ ...

Copied: incubator/lucy/trunk/perl/lib/Lucy.pm (from r1030833, incubator/lucy/trunk/perl/lib/KinoSearch.pm)
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy.pm?p2=incubator/lucy/trunk/perl/lib/Lucy.pm&p1=incubator/lucy/trunk/perl/lib/KinoSearch.pm&r1=1030833&r2=1030838&rev=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/KinoSearch.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy.pm Thu Nov  4 05:36:36 2010
@@ -16,7 +16,7 @@
 use strict;
 use warnings;
 
-package KinoSearch;
+package Lucy;
 
 use 5.008003;
 use Exporter;
@@ -26,14 +26,14 @@ $VERSION = eval $VERSION;
 
 use XSLoader;
 # This loads a large number of disparate subs.
-BEGIN { XSLoader::load( 'KinoSearch', '0.001' ) }
+BEGIN { XSLoader::load( 'Lucy', '0.001' ) }
 
 BEGIN {
     push our @ISA, 'Exporter';
     our @EXPORT_OK = qw( to_clownfish to_perl kdump );
 }
 
-use KinoSearch::Autobinding;
+use Lucy::Autobinding;
 
 sub kdump {
     require Data::Dumper;
@@ -43,10 +43,10 @@ sub kdump {
     warn $kdumper->Dump;
 }
 
-sub error {$KinoSearch::Object::Err::error}
+sub error {$Lucy::Object::Err::error}
 
 {
-    package KinoSearch::Util::IndexFileNames;
+    package Lucy::Util::IndexFileNames;
     BEGIN {
         push our @ISA, 'Exporter';
         our @EXPORT_OK = qw(
@@ -57,7 +57,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Util::StringHelper;
+    package Lucy::Util::StringHelper;
     BEGIN {
         push our @ISA, 'Exporter';
         our @EXPORT_OK = qw(
@@ -74,12 +74,12 @@ sub error {$KinoSearch::Object::Err::err
 
 {
     # Temporary back compat.
-    package KinoSearch::Schema;
-    BEGIN { our @ISA = qw( KinoSearch::Plan::Schema ) }
+    package Lucy::Schema;
+    BEGIN { our @ISA = qw( Lucy::Plan::Schema ) }
 }
 
 {
-    package KinoSearch::Analysis::Inversion;
+    package Lucy::Analysis::Inversion;
 
     our %new_PARAMS = (
         # params
@@ -88,16 +88,16 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Analysis::Stemmer;
+    package Lucy::Analysis::Stemmer;
     sub lazy_load_snowball {
         require Lingua::Stem::Snowball;
-        KinoSearch::Analysis::Stemmer::_copy_snowball_symbols();
+        Lucy::Analysis::Stemmer::_copy_snowball_symbols();
     }
 }
 
 {
-    package KinoSearch::Analysis::Stopalizer;
-    use KinoSearch qw( to_clownfish );
+    package Lucy::Analysis::Stopalizer;
+    use Lucy qw( to_clownfish );
 
     sub gen_stoplist {
         my ( undef, $language ) = @_;
@@ -113,7 +113,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Analysis::Token;
+    package Lucy::Analysis::Token;
 
     our %new_PARAMS = (
         text         => undef,
@@ -125,7 +125,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Analysis::Tokenizer;
+    package Lucy::Analysis::Tokenizer;
 
     sub compile_token_re { return qr/$_[1]/ }
 
@@ -138,7 +138,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Document::Doc;
+    package Lucy::Document::Doc;
     use Storable qw( nfreeze thaw );
     use bytes;
     no bytes;
@@ -164,29 +164,29 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Object::I32Array;
+    package Lucy::Object::I32Array;
     our %new_PARAMS = ( ints => undef );
 }
 
 {
-    package KinoSearch::Object::LockFreeRegistry;
+    package Lucy::Object::LockFreeRegistry;
     sub DESTROY { }    # leak all
 }
 
 {
-    package KinoSearch::Object::Obj;
-    use KinoSearch qw( to_clownfish to_perl );
+    package Lucy::Object::Obj;
+    use Lucy qw( to_clownfish to_perl );
     sub load { return $_[0]->_load( to_clownfish( $_[1] ) ) }
 }
 
 {
-    package KinoSearch::Object::VTable;
+    package Lucy::Object::VTable;
 
     sub find_parent_class {
         my ( undef, $package ) = @_;
         no strict 'refs';
         for my $parent ( @{"$package\::ISA"} ) {
-            return $parent if $parent->isa('KinoSearch::Object::Obj');
+            return $parent if $parent->isa('Lucy::Object::Obj');
         }
         return;
     }
@@ -195,12 +195,12 @@ sub error {$KinoSearch::Object::Err::err
         my ( undef, $package ) = @_;
         no strict 'refs';
         my $stash   = \%{"$package\::"};
-        my $methods = KinoSearch::Object::VArray->new(
+        my $methods = Lucy::Object::VArray->new(
             capacity => scalar keys %$stash );
         while ( my ( $symbol, $glob ) = each %$stash ) {
             next if ref $glob;
             next unless *$glob{CODE};
-            $methods->push( KinoSearch::Object::CharBuf->new($symbol) );
+            $methods->push( Lucy::Object::CharBuf->new($symbol) );
         }
         return $methods;
     }
@@ -217,7 +217,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Index::Indexer;
+    package Lucy::Index::Indexer;
 
     sub new {
         my ( $either, %args ) = @_;
@@ -231,7 +231,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Index::IndexReader;
+    package Lucy::Index::IndexReader;
     use Carp;
 
     sub new {
@@ -240,14 +240,14 @@ sub error {$KinoSearch::Object::Err::err
     }
     sub lexicon {
         my $self       = shift;
-        my $lex_reader = $self->fetch("KinoSearch::Index::LexiconReader");
+        my $lex_reader = $self->fetch("Lucy::Index::LexiconReader");
         return $lex_reader->lexicon(@_) if $lex_reader;
         return;
     }
     sub posting_list {
         my $self = shift;
         my $plist_reader
-            = $self->fetch("KinoSearch::Index::PostingListReader");
+            = $self->fetch("Lucy::Index::PostingListReader");
         return $plist_reader->posting_list(@_) if $plist_reader;
         return;
     }
@@ -255,14 +255,14 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Index::PolyReader;
-    use KinoSearch qw( to_clownfish );
+    package Lucy::Index::PolyReader;
+    use Lucy qw( to_clownfish );
 
     sub try_read_snapshot {
         my ( undef, %args ) = @_;
         my ( $snapshot, $folder, $path ) = @args{qw( snapshot folder path )};
         eval { $snapshot->read_file( folder => $folder, path => $path ); };
-        if   ($@) { return KinoSearch::Object::CharBuf->new($@) }
+        if   ($@) { return Lucy::Object::CharBuf->new($@) }
         else      { return undef }
     }
 
@@ -271,14 +271,14 @@ sub error {$KinoSearch::Object::Err::err
         my $schema      = $self->get_schema;
         my $folder      = $self->get_folder;
         my $snapshot    = $self->get_snapshot;
-        my $seg_readers = KinoSearch::Object::VArray->new(
+        my $seg_readers = Lucy::Object::VArray->new(
             capacity => scalar @$segments );
         my $segs = to_clownfish($segments);    # FIXME: Don't convert twice.
         eval {
             # Create a SegReader for each segment in the index.
             my $num_segs = scalar @$segments;
             for ( my $seg_tick = 0; $seg_tick < $num_segs; $seg_tick++ ) {
-                my $seg_reader = KinoSearch::Index::SegReader->new(
+                my $seg_reader = Lucy::Index::SegReader->new(
                     schema   => $schema,
                     folder   => $folder,
                     segments => $segs,
@@ -289,15 +289,15 @@ sub error {$KinoSearch::Object::Err::err
             }
         };
         if ($@) {
-            return KinoSearch::Object::CharBuf->new($@);
+            return Lucy::Object::CharBuf->new($@);
         }
         return $seg_readers;
     }
 }
 
 {
-    package KinoSearch::Index::Segment;
-    use KinoSearch qw( to_clownfish );
+    package Lucy::Index::Segment;
+    use Lucy qw( to_clownfish );
     sub store_metadata {
         my ( $self, %args ) = @_;
         $self->_store_metadata( %args,
@@ -306,24 +306,24 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Index::SegReader;
+    package Lucy::Index::SegReader;
 
     sub try_init_components {
         my $self = shift;
         my $arch = $self->get_schema->get_architecture;
         eval { $arch->init_seg_reader($self); };
-        if ($@) { return KinoSearch::Object::CharBuf->new($@); }
+        if ($@) { return Lucy::Object::CharBuf->new($@); }
         return;
     }
 }
 
 {
-    package KinoSearch::Index::SortCache;
+    package Lucy::Index::SortCache;
     our %value_PARAMS = ( ord => undef, );
 }
 
 {
-    package KinoSearch::Search::Compiler;
+    package Lucy::Search::Compiler;
     use Carp;
     use Scalar::Util qw( blessed );
 
@@ -332,7 +332,7 @@ sub error {$KinoSearch::Object::Err::err
         if ( !defined $args{boost} ) {
             confess("'parent' is not a Query")
                 unless ( blessed( $args{parent} )
-                and $args{parent}->isa("KinoSearch::Search::Query") );
+                and $args{parent}->isa("Lucy::Search::Query") );
             $args{boost} = $args{parent}->get_boost;
         }
         return $either->do_new(%args);
@@ -340,7 +340,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Search::Query;
+    package Lucy::Search::Query;
 
     sub make_compiler {
         my ( $self, %args ) = @_;
@@ -350,7 +350,7 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Search::SortRule;
+    package Lucy::Search::SortRule;
 
     my %types = (
         field  => FIELD(),
@@ -367,12 +367,12 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Object::BitVector;
+    package Lucy::Object::BitVector;
     sub to_arrayref { shift->to_array->to_arrayref }
 }
 
 {
-    package KinoSearch::Object::ByteBuf;
+    package Lucy::Object::ByteBuf;
     {
         # Override autogenerated deserialize binding.
         no warnings 'redefine';
@@ -381,13 +381,13 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Object::ViewByteBuf;
+    package Lucy::Object::ViewByteBuf;
     use Carp;
     sub new { confess "ViewByteBuf objects can only be created from C." }
 }
 
 {
-    package KinoSearch::Object::CharBuf;
+    package Lucy::Object::CharBuf;
 
     {
         # Defeat obscure bugs in the XS auto-generation by redefining clone()
@@ -401,20 +401,20 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Object::ViewCharBuf;
+    package Lucy::Object::ViewCharBuf;
     use Carp;
     sub new { confess "ViewCharBuf has no public constructor." }
 }
 
 {
-    package KinoSearch::Object::ZombieCharBuf;
+    package Lucy::Object::ZombieCharBuf;
     use Carp;
     sub new { confess "ZombieCharBuf objects can only be created from C." }
     sub DESTROY { }
 }
 
 {
-    package KinoSearch::Object::Err;
+    package Lucy::Object::Err;
     sub do_to_string { shift->to_string }
     use Scalar::Util qw( blessed );
     use Carp qw( confess longmess );
@@ -427,7 +427,7 @@ sub error {$KinoSearch::Object::Err::err
         my ( undef, $file, $line ) = caller;
         $message .= ", $file line $line\n";
         return $either->_new(
-            mess => KinoSearch::Object::CharBuf->new($message) );
+            mess => Lucy::Object::CharBuf->new($message) );
     }
 
     sub do_throw {
@@ -440,9 +440,9 @@ sub error {$KinoSearch::Object::Err::err
     sub set_error {
         my $val = $_[1];
         if ( defined $val ) {
-            confess("Not a KinoSearch::Object::Err")
+            confess("Not a Lucy::Object::Err")
                 unless ( blessed($val)
-                && $val->isa("KinoSearch::Object::Err") );
+                && $val->isa("Lucy::Object::Err") );
         }
         $error = $val;
     }
@@ -450,20 +450,20 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Object::Hash;
+    package Lucy::Object::Hash;
     no warnings 'redefine';
     sub deserialize { shift->_deserialize(@_) }
 }
 
 {
-    package KinoSearch::Object::VArray;
+    package Lucy::Object::VArray;
     no warnings 'redefine';
     sub clone       { CORE::shift->_clone }
     sub deserialize { CORE::shift->_deserialize(@_) }
 }
 
 {
-    package KinoSearch::Store::FileHandle;
+    package Lucy::Store::FileHandle;
     BEGIN {
         push our @ISA, 'Exporter';
         our @EXPORT_OK = qw( build_fh_flags );
@@ -488,37 +488,37 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Store::FSFileHandle;
+    package Lucy::Store::FSFileHandle;
 
     sub open {
         my ( $either, %args ) = @_;
         $args{flags} ||= 0;
         $args{flags}
-            |= KinoSearch::Store::FileHandle::build_fh_flags( \%args );
+            |= Lucy::Store::FileHandle::build_fh_flags( \%args );
         return $either->_open(%args);
     }
 }
 
 {
-    package KinoSearch::Store::FSFolder;
+    package Lucy::Store::FSFolder;
     use File::Spec::Functions qw( rel2abs );
     sub absolutify { return rel2abs( $_[1] ) }
 }
 
 {
-    package KinoSearch::Store::RAMFileHandle;
+    package Lucy::Store::RAMFileHandle;
 
     sub open {
         my ( $either, %args ) = @_;
         $args{flags} ||= 0;
         $args{flags}
-            |= KinoSearch::Store::FileHandle::build_fh_flags( \%args );
+            |= Lucy::Store::FileHandle::build_fh_flags( \%args );
         return $either->_open(%args);
     }
 }
 
 {
-    package KinoSearch::Util::Debug;
+    package Lucy::Util::Debug;
     BEGIN {
         push our @ISA, 'Exporter';
         our @EXPORT_OK = qw(
@@ -535,9 +535,9 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Util::Json;
+    package Lucy::Util::Json;
     use Scalar::Util qw( blessed );
-    use KinoSearch qw( to_clownfish );
+    use Lucy qw( to_clownfish );
 
     use JSON::XS qw();
 
@@ -552,8 +552,8 @@ sub error {$KinoSearch::Object::Err::err
         $instream->read( $json, $len );
         my $result = eval { to_clownfish( $json_encoder->decode($json) ) };
         if ( $@ or !$result ) {
-            KinoSearch::Object::Err->set_error(
-                KinoSearch::Object::Err->new( $@ || "Failed to decode JSON" )
+            Lucy::Object::Err->set_error(
+                Lucy::Object::Err->new( $@ || "Failed to decode JSON" )
             );
             return;
         }
@@ -564,8 +564,8 @@ sub error {$KinoSearch::Object::Err::err
         my ( undef, %args ) = @_;
         my $json = eval { $json_encoder->encode( $args{'dump'} ) };
         if ( !defined $json ) {
-            KinoSearch::Object::Err->set_error(
-                KinoSearch::Object::Err->new($@) );
+            Lucy::Object::Err->set_error(
+                Lucy::Object::Err->new($@) );
             return 0;
         }
         my $outstream = $args{folder}->open_out( $args{path} );
@@ -576,13 +576,13 @@ sub error {$KinoSearch::Object::Err::err
         };
         if ($@) {
             my $error;
-            if ( blessed($@) && $@->isa("KinoSearch::Object::Err") ) {
+            if ( blessed($@) && $@->isa("Lucy::Object::Err") ) {
                 $error = $@;
             }
             else {
-                $error = KinoSearch::Object::Err->new($@);
+                $error = Lucy::Object::Err->new($@);
             }
-            KinoSearch::Object::Err->set_error($error);
+            Lucy::Object::Err->set_error($error);
             return 0;
         }
         return 1;
@@ -601,10 +601,10 @@ sub error {$KinoSearch::Object::Err::err
 }
 
 {
-    package KinoSearch::Object::Host;
+    package Lucy::Object::Host;
     BEGIN {
-        if ( !__PACKAGE__->isa('KinoSearch::Object::Obj') ) {
-            push our @ISA, 'KinoSearch::Object::Obj';
+        if ( !__PACKAGE__->isa('Lucy::Object::Obj') ) {
+            push our @ISA, 'Lucy::Object::Obj';
         }
     }
 }
@@ -616,10 +616,10 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch    PACKAGE = KinoSearch
+MODULE = Lucy    PACKAGE = Lucy
 
 BOOT:
-    lucy_KinoSearch_bootstrap();
+    lucy_Lucy_bootstrap();
 
 IV
 _dummy_function()
@@ -643,7 +643,7 @@ to_perl(sv)
     SV *sv;
 CODE:
 {
-    if (sv_isobject(sv) && sv_derived_from(sv, "KinoSearch::Object::Obj")) {
+    if (sv_isobject(sv) && sv_derived_from(sv, "Lucy::Object::Obj")) {
         IV tmp = SvIV(SvRV(sv));
         lucy_Obj* obj = INT2PTR(lucy_Obj*, tmp);
         RETVAL = XSBind_cfish_to_perl(obj);
@@ -657,7 +657,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel     => "Lucy",
-    class_name => "KinoSearch",
+    class_name => "Lucy",
     xs_code    => $xs_code,
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/Analyzer.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/Analyzer.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/Analyzer.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/Analyzer.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::Analyzer;
-use KinoSearch;
+package Lucy::Analysis::Analyzer;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Analysis::Analyzer",
+    class_name        => "Lucy::Analysis::Analyzer",
     bind_methods      => [qw( Transform Transform_Text Split )],
     bind_constructors => ["new"],
     make_pod          => { synopsis => "    # Abstract base class.\n", }

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/CaseFolder.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/CaseFolder.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/CaseFolder.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/CaseFolder.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::CaseFolder;
-use KinoSearch;
+package Lucy::Analysis::CaseFolder;
+use Lucy;
 
 1;
 
@@ -36,7 +36,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Analysis::CaseFolder",
+    class_name        => "Lucy::Analysis::CaseFolder",
     bind_constructors => ["new"],
     make_pod          => {
         synopsis    => $synopsis,

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/Inversion.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/Inversion.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/Inversion.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/Inversion.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::Inversion;
-use KinoSearch;
+package Lucy::Analysis::Inversion;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs = <<'END_XS';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Analysis::Inversion
+MODULE = Lucy   PACKAGE = Lucy::Analysis::Inversion
 
 SV*
 new(...)
@@ -34,7 +34,7 @@ CODE:
     if (items > 1) {
         SV *text_sv = NULL;
         XSBind_allot_params( &(ST(0)), 1, items, 
-            "KinoSearch::Analysis::Inversion::new_PARAMS",
+            "Lucy::Analysis::Inversion::new_PARAMS",
             &text_sv, "text", 4,
             NULL);
         if (XSBind_sv_defined(text_sv)) {
@@ -52,7 +52,7 @@ END_XS
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Analysis::Inversion",
+    class_name   => "Lucy::Analysis::Inversion",
     bind_methods => [qw( Append Reset Invert Next )],
     xs_code      => $xs,
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/PolyAnalyzer.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/PolyAnalyzer.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/PolyAnalyzer.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/PolyAnalyzer.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::PolyAnalyzer;
-use KinoSearch;
+package Lucy::Analysis::PolyAnalyzer;
+use Lucy;
 
 1;
 
@@ -50,7 +50,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Analysis::PolyAnalyzer",
+    class_name        => "Lucy::Analysis::PolyAnalyzer",
     bind_constructors => ["new"],
     bind_methods      => [qw( Get_Analyzers )],
     make_pod          => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stemmer.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stemmer.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stemmer.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stemmer.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::Stemmer;
-use KinoSearch;
+package Lucy::Analysis::Stemmer;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs = <<'END_XS';
-MODULE = KinoSearch    PACKAGE = KinoSearch::Analysis::Stemmer
+MODULE = Lucy    PACKAGE = Lucy::Analysis::Stemmer
 
 void
 _copy_snowball_symbols()
@@ -68,7 +68,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Analysis::Stemmer",
+    class_name        => "Lucy::Analysis::Stemmer",
     bind_constructors => ["new"],
     xs_code           => $xs,
     make_pod          => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stopalizer.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stopalizer.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stopalizer.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/Stopalizer.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::Stopalizer;
-use KinoSearch;
+package Lucy::Analysis::Stopalizer;
+use Lucy;
 
 1;
 
@@ -47,7 +47,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Analysis::Stopalizer",
+    class_name        => "Lucy::Analysis::Stopalizer",
     bind_constructors => ["new"],
     make_pod          => {
         synopsis    => $synopsis,

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/Token.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/Token.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/Token.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/Token.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::Token;
-use KinoSearch;
+package Lucy::Analysis::Token;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs = <<'END_XS';
-MODULE = KinoSearch    PACKAGE = KinoSearch::Analysis::Token
+MODULE = Lucy    PACKAGE = Lucy::Analysis::Token
 
 SV*
 new(either_sv, ...)
@@ -37,7 +37,7 @@ CODE:
     SV *boost_sv        = NULL;
 
     XSBind_allot_params( &(ST(0)), 1, items, 
-        "KinoSearch::Analysis::Token::new_PARAMS",
+        "Lucy::Analysis::Token::new_PARAMS",
         &text_sv, "text", 4,
         &start_offset_sv, "start_offset", 12, 
         &end_offset_sv, "end_offset", 10, 
@@ -90,7 +90,7 @@ END_XS
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Analysis::Token",
+    class_name   => "Lucy::Analysis::Token",
     bind_methods => [
         qw(
             Get_Start_Offset

Modified: incubator/lucy/trunk/perl/lib/Lucy/Analysis/Tokenizer.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Analysis/Tokenizer.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Analysis/Tokenizer.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Analysis/Tokenizer.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Analysis::Tokenizer;
-use KinoSearch;
+package Lucy::Analysis::Tokenizer;
+use Lucy;
 
 1;
 
@@ -46,7 +46,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Analysis::Tokenizer",
+    class_name        => "Lucy::Analysis::Tokenizer",
     bind_methods      => [qw( Set_Token_RE )],
     bind_constructors => ["_new"],
     make_pod          => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Docs/DevGuide.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Docs/DevGuide.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Docs/DevGuide.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Docs/DevGuide.pm Thu Nov  4 05:36:36 2010
@@ -13,7 +13,7 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-use KinoSearch;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel     => "Lucy",
-    class_name => "KinoSearch::Docs::DevGuide",
+    class_name => "Lucy::Docs::DevGuide",
     make_pod   => {},
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Docs/FileLocking.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Docs/FileLocking.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Docs/FileLocking.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Docs/FileLocking.pm Thu Nov  4 05:36:36 2010
@@ -13,7 +13,7 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-use KinoSearch;
+use Lucy;
 
 1;
 
@@ -42,7 +42,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel     => "Lucy",
-    class_name => "KinoSearch::Docs::FileLocking",
+    class_name => "Lucy::Docs::FileLocking",
     make_pod   => { synopsis => $synopsis, },
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Document/Doc.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Document/Doc.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Document/Doc.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Document/Doc.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Document::Doc;
-use KinoSearch;
+package Lucy::Document::Doc;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch     PACKAGE = KinoSearch::Document::Doc
+MODULE = Lucy     PACKAGE = Lucy::Document::Doc
 
 SV*
 get_fields(self, ...)
@@ -54,7 +54,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Document::Doc",
+    class_name        => "Lucy::Document::Doc",
     xs_code           => $xs_code,
     bind_constructors => ['new'],
     bind_methods      => [qw( Set_Doc_ID Get_Doc_ID Set_Fields )],

Modified: incubator/lucy/trunk/perl/lib/Lucy/Document/HitDoc.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Document/HitDoc.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Document/HitDoc.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Document/HitDoc.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Document::HitDoc;
-use KinoSearch;
+package Lucy::Document::HitDoc;
+use Lucy;
 
 1;
 
@@ -32,7 +32,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Document::HitDoc",
+    class_name        => "Lucy::Document::HitDoc",
     bind_constructors => ['new'],
     bind_methods      => [qw( Set_Score Get_Score )],
     make_pod          => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Highlight/HeatMap.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Highlight/HeatMap.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Highlight/HeatMap.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Highlight/HeatMap.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Highlight::HeatMap;
-use KinoSearch;
+package Lucy::Highlight::HeatMap;
+use Lucy;
 
 1;
 
@@ -31,7 +31,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Highlight::HeatMap",
+    class_name   => "Lucy::Highlight::HeatMap",
     bind_methods => [
         qw(
             Calc_Proximity_Boost

Modified: incubator/lucy/trunk/perl/lib/Lucy/Highlight/Highlighter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Highlight/Highlighter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Highlight/Highlighter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Highlight/Highlighter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Highlight::Highlighter;
-use KinoSearch;
+package Lucy::Highlight::Highlighter;
+use Lucy;
 
 1;
 
@@ -46,7 +46,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Highlight::Highlighter",
+    class_name   => "Lucy::Highlight::Highlighter",
     bind_methods => [
         qw(
             Highlight

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/BackgroundMerger.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/BackgroundMerger.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/BackgroundMerger.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/BackgroundMerger.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::BackgroundMerger;
-use KinoSearch;
+package Lucy::Index::BackgroundMerger;
+use Lucy;
 
 1;
 
@@ -38,7 +38,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::BackgroundMerger",
+    class_name   => "Lucy::Index::BackgroundMerger",
     bind_methods => [
         qw(
             Commit

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DataReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DataReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DataReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DataReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DataReader;
-use KinoSearch;
+package Lucy::Index::DataReader;
+use Lucy;
 
 1;
 
@@ -38,7 +38,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::DataReader",
+    class_name   => "Lucy::Index::DataReader",
     bind_methods => [
         qw(
             Get_Schema

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DataWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DataWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DataWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DataWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DataWriter;
-use KinoSearch;
+package Lucy::Index::DataWriter;
+use Lucy;
 
 1;
 
@@ -36,7 +36,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::DataWriter",
+    class_name   => "Lucy::Index::DataWriter",
     bind_methods => [
         qw(
             Add_Inverted_Doc

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DeletionsReader;
-use KinoSearch;
+package Lucy::Index::DeletionsReader;
+use Lucy;
 
 1;
 
@@ -24,13 +24,13 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DeletionsReader",
+    class_name        => "Lucy::Index::DeletionsReader",
     bind_constructors => ['new'],
     bind_methods      => [qw( Iterator Del_Count )],
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultDeletionsReader",
+    class_name        => "Lucy::Index::DefaultDeletionsReader",
     bind_constructors => ['new'],
     bind_methods      => [qw( Read_Deletions )],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DeletionsWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DeletionsWriter;
-use KinoSearch;
+package Lucy::Index::DeletionsWriter;
+use Lucy;
 
 1;
 
@@ -33,7 +33,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::DeletionsWriter",
+    class_name   => "Lucy::Index::DeletionsWriter",
     bind_methods => [
         qw(
             Generate_Doc_Map
@@ -59,7 +59,7 @@ Clownfish::Binding::Perl::Class->registe
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultDeletionsWriter",
+    class_name        => "Lucy::Index::DefaultDeletionsWriter",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DocReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DocReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DocReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DocReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DocReader;
-use KinoSearch;
+package Lucy::Index::DocReader;
+use Lucy;
 
 1;
 
@@ -29,7 +29,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DocReader",
+    class_name        => "Lucy::Index::DocReader",
     bind_constructors => ["new"],
     bind_methods      => [qw( Fetch_Doc )],
     make_pod          => {
@@ -39,7 +39,7 @@ Clownfish::Binding::Perl::Class->registe
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultDocReader",
+    class_name        => "Lucy::Index::DefaultDocReader",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DocVector.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DocVector.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DocVector.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DocVector.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DocVector;
-use KinoSearch;
+package Lucy::Index::DocVector;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DocVector",
+    class_name        => "Lucy::Index::DocVector",
     bind_methods      => [qw( Term_Vector Field_Buf Add_Field_Buf )],
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/DocWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/DocWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/DocWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/DocWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::DocWriter;
-use KinoSearch;
+package Lucy::Index::DocWriter;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DocWriter",
+    class_name        => "Lucy::Index::DocWriter",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/FilePurger.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/FilePurger.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/FilePurger.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/FilePurger.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::FilePurger;
-use KinoSearch;
+package Lucy::Index::FilePurger;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::FilePurger",
+    class_name        => "Lucy::Index::FilePurger",
     bind_methods      => [qw( Purge )],
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::HighlightReader;
-use KinoSearch;
+package Lucy::Index::HighlightReader;
+use Lucy;
 
 1;
 
@@ -24,12 +24,12 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::HighlightReader",
+    class_name        => "Lucy::Index::HighlightReader",
     bind_constructors => ["new"],
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultHighlightReader",
+    class_name        => "Lucy::Index::DefaultHighlightReader",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/HighlightWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::HighlightWriter;
-use KinoSearch;
+package Lucy::Index::HighlightWriter;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::HighlightWriter",
+    class_name        => "Lucy::Index::HighlightWriter",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/IndexManager.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/IndexManager.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/IndexManager.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/IndexManager.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::IndexManager;
-use KinoSearch;
+package Lucy::Index::IndexManager;
+use Lucy;
 
 1;
 
@@ -51,7 +51,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::IndexManager",
+    class_name        => "Lucy::Index::IndexManager",
     bind_constructors => ["new"],
     bind_methods      => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/IndexReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/IndexReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/IndexReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/IndexReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::IndexReader;
-use KinoSearch;
+package Lucy::Index::IndexReader;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch    PACKAGE = KinoSearch::Index::IndexReader
+MODULE = Lucy    PACKAGE = Lucy::Index::IndexReader
 
 void
 set_race_condition_debug1(val_sv)
@@ -69,7 +69,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::IndexReader",
+    class_name   => "Lucy::Index::IndexReader",
     xs_code      => $xs_code,
     bind_methods => [
         qw( Doc_Max

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Indexer.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Indexer.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Indexer.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Indexer.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Indexer;
-use KinoSearch;
+package Lucy::Index::Indexer;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch  PACKAGE = KinoSearch::Index::Indexer
+MODULE = Lucy  PACKAGE = Lucy::Index::Indexer
 
 int32_t
 CREATE(...)
@@ -54,7 +54,7 @@ PPCODE:
     else if (items > 2) {
         SV* boost_sv = NULL; 
         XSBind_allot_params( &(ST(0)), 1, items, 
-            "KinoSearch::Index::Indexer::add_doc_PARAMS", &doc_sv, "doc", 3,
+            "Lucy::Index::Indexer::add_doc_PARAMS", &doc_sv, "doc", 3,
             &boost_sv, "boost", 5, NULL);
         if (boost_sv) {
             boost = (float)SvNV(boost_sv);
@@ -66,7 +66,7 @@ PPCODE:
 
     // Either get a Doc or use the stock doc. 
     if (   sv_isobject(doc_sv) 
-        && sv_derived_from(doc_sv, "KinoSearch::Document::Doc")
+        && sv_derived_from(doc_sv, "Lucy::Document::Doc")
     ) {
         IV tmp = SvIV( SvRV(doc_sv) );
         doc = INT2PTR(lucy_Doc*, tmp);
@@ -174,7 +174,7 @@ END_ADD_DOC_POD
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::Indexer",
+    class_name   => "Lucy::Index::Indexer",
     xs_code      => $xs_code,
     bind_methods => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Inverter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Inverter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Inverter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Inverter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Inverter;
-use KinoSearch;
+package Lucy::Index::Inverter;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::Inverter",
+    class_name        => "Lucy::Index::Inverter",
     bind_constructors => ["new"],
     bind_methods      => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Lexicon.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Lexicon.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Lexicon.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Lexicon.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Lexicon;
-use KinoSearch;
+package Lucy::Index::Lexicon;
+use Lucy;
 
 1;
 
@@ -32,7 +32,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::Lexicon",
+    class_name        => "Lucy::Index::Lexicon",
     bind_methods      => [qw( Seek Next Reset Get_Term Get_Field )],
     bind_constructors => ["new"],
     make_pod          => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::LexiconReader;
-use KinoSearch;
+package Lucy::Index::LexiconReader;
+use Lucy;
 
 1;
 
@@ -29,7 +29,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::LexiconReader",
+    class_name        => "Lucy::Index::LexiconReader",
     bind_methods      => [qw( Lexicon Doc_Freq Fetch_Term_Info )],
     bind_constructors => ["new"],
     make_pod          => {
@@ -39,7 +39,7 @@ Clownfish::Binding::Perl::Class->registe
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultLexiconReader",
+    class_name        => "Lucy::Index::DefaultLexiconReader",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/LexiconWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::LexiconWriter;
-use KinoSearch;
+package Lucy::Index::LexiconWriter;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::LexiconWriter",
+    class_name        => "Lucy::Index::LexiconWriter",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/PolyLexicon.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/PolyLexicon.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/PolyLexicon.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/PolyLexicon.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::PolyLexicon;
-use KinoSearch;
+package Lucy::Index::PolyLexicon;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::PolyLexicon",
+    class_name        => "Lucy::Index::PolyLexicon",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/PolyReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/PolyReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/PolyReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/PolyReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::PolyReader;
-use KinoSearch;
+package Lucy::Index::PolyReader;
+use Lucy;
 
 1;
 
@@ -35,7 +35,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::PolyReader",
+    class_name        => "Lucy::Index::PolyReader",
     bind_constructors => [ 'new', 'open|do_open' ],
     bind_methods      => [qw( Get_Seg_Readers )],
     make_pod          => { synopsis => $synopsis },

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Posting.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Posting.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Posting.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Posting.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Posting;
-use KinoSearch;
+package Lucy::Index::Posting;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::Posting",
+    class_name   => "Lucy::Index::Posting",
     bind_methods => [qw( Get_Doc_ID )],
 #    make_pod => {
 #        synopsis => "    # Abstract base class.\n",

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/MatchPosting.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/MatchPosting.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/MatchPosting.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/MatchPosting.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Posting::MatchPosting;
-use KinoSearch;
+package Lucy::Index::Posting::MatchPosting;
+use Lucy;
 
 1;
 
@@ -34,7 +34,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::Posting::MatchPosting",
+    class_name        => "Lucy::Index::Posting::MatchPosting",
     bind_constructors => ["new"],
     bind_methods      => [qw( Get_Freq )],
 #    make_pod => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/RichPosting.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/RichPosting.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/RichPosting.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/RichPosting.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Posting::RichPosting;
-use KinoSearch;
+package Lucy::Index::Posting::RichPosting;
+use Lucy;
 
 1;
 
@@ -34,7 +34,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::Posting::RichPosting",
+    class_name        => "Lucy::Index::Posting::RichPosting",
     bind_constructors => ["new"],
 #    make_pod => {
 #        synopsis => $synopsis,

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/ScorePosting.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/ScorePosting.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/ScorePosting.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Posting/ScorePosting.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Posting::ScorePosting;
-use KinoSearch;
+package Lucy::Index::Posting::ScorePosting;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Index::Posting::ScorePosting
+MODULE = Lucy   PACKAGE = Lucy::Index::Posting::ScorePosting
 
 SV*
 get_prox(self)
@@ -57,7 +57,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::Posting::ScorePosting",
+    class_name        => "Lucy::Index::Posting::ScorePosting",
     xs_code           => $xs_code,
     bind_constructors => ["new"],
 #    make_pod => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/PostingList.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/PostingList.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/PostingList.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/PostingList.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::PostingList;
-use KinoSearch;
+package Lucy::Index::PostingList;
+use Lucy;
 
 1;
 
@@ -36,7 +36,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::PostingList",
+    class_name   => "Lucy::Index::PostingList",
     bind_methods => [
         qw(
             Seek

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::PostingListReader;
-use KinoSearch;
+package Lucy::Index::PostingListReader;
+use Lucy;
 
 1;
 
@@ -33,7 +33,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::PostingListReader",
+    class_name        => "Lucy::Index::PostingListReader",
     bind_constructors => ["new"],
     bind_methods      => [qw( Posting_List Get_Lex_Reader )],
     make_pod          => {
@@ -43,7 +43,7 @@ Clownfish::Binding::Perl::Class->registe
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultPostingListReader",
+    class_name        => "Lucy::Index::DefaultPostingListReader",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/PostingListWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::PostingListWriter;
-use KinoSearch;
+package Lucy::Index::PostingListWriter;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS';
-MODULE = KinoSearch    PACKAGE = KinoSearch::Index::PostingListWriter
+MODULE = Lucy    PACKAGE = Lucy::Index::PostingListWriter
 
 void
 set_default_mem_thresh(mem_thresh)
@@ -34,7 +34,7 @@ END_XS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::PostingListWriter",
+    class_name        => "Lucy::Index::PostingListWriter",
     xs_code           => $xs_code,
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SegLexicon.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SegLexicon.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SegLexicon.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SegLexicon.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SegLexicon;
-use KinoSearch;
+package Lucy::Index::SegLexicon;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SegLexicon",
+    class_name        => "Lucy::Index::SegLexicon",
     bind_methods      => [qw( Get_Term_Info Get_Field_Num )],
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SegPostingList.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SegPostingList.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SegPostingList.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SegPostingList.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SegPostingList;
-use KinoSearch;
+package Lucy::Index::SegPostingList;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SegPostingList",
+    class_name        => "Lucy::Index::SegPostingList",
     bind_methods      => [qw( Get_Post_Stream Get_Count )],
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SegReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SegReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SegReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SegReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SegReader;
-use KinoSearch;
+package Lucy::Index::SegReader;
+use Lucy;
 
 1;
 
@@ -41,7 +41,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SegReader",
+    class_name        => "Lucy::Index::SegReader",
     bind_methods      => [qw( Get_Seg_Name Get_Seg_Num Register )],
     bind_constructors => ["new"],
     make_pod          => {

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SegWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SegWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SegWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SegWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SegWriter;
-use KinoSearch;
+package Lucy::Index::SegWriter;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SegWriter",
+    class_name        => "Lucy::Index::SegWriter",
     bind_constructors => ["new"],
     bind_methods      => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Segment.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Segment.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Segment.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Segment.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Segment;
-use KinoSearch;
+package Lucy::Index::Segment;
+use Lucy;
 
 1;
 
@@ -56,7 +56,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::Segment",
+    class_name   => "Lucy::Index::Segment",
     bind_methods => [
         qw(
             Add_Field

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Similarity.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Similarity.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Similarity.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Similarity.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Similarity;
-use KinoSearch;
+package Lucy::Index::Similarity;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch    PACKAGE = KinoSearch::Index::Similarity     
+MODULE = Lucy    PACKAGE = Lucy::Index::Similarity     
 
 SV*
 get_norm_decoder(self)
@@ -49,7 +49,7 @@ my $constructor = qq|    my \$sim = Lucy
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::Similarity",
+    class_name   => "Lucy::Index::Similarity",
     xs_code      => $xs_code,
     bind_methods => [
         qw( IDF

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/Snapshot.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/Snapshot.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/Snapshot.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/Snapshot.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::Snapshot;
-use KinoSearch;
+package Lucy::Index::Snapshot;
+use Lucy;
 
 1;
 
@@ -35,7 +35,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::Snapshot",
+    class_name   => "Lucy::Index::Snapshot",
     bind_methods => [
         qw(
             List

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SortCache.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SortCache.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SortCache.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SortCache.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SortCache;
-use KinoSearch;
+package Lucy::Index::SortCache;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Index::SortCache
+MODULE = Lucy   PACKAGE = Lucy::Index::SortCache
 
 SV*
 value(self, ...)
@@ -34,7 +34,7 @@ CODE:
     int32_t ord = 0;
 
     XSBind_allot_params( &(ST(0)), 1, items, 
-        "KinoSearch::Index::SortCache::value_PARAMS",
+        "Lucy::Index::SortCache::value_PARAMS",
         &ord_sv, "ord", 3, 
         NULL);
     if (ord_sv) { ord = SvIV(ord_sv); }
@@ -52,7 +52,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SortCache",
+    class_name        => "Lucy::Index::SortCache",
     xs_code           => $xs_code,
     bind_constructors => ["new"],
     bind_methods      => [qw( Ordinal Find )],

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SortReader.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SortReader.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SortReader.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SortReader.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SortReader;
-use KinoSearch;
+package Lucy::Index::SortReader;
+use Lucy;
 
 1;
 
@@ -24,13 +24,13 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SortReader",
+    class_name        => "Lucy::Index::SortReader",
     bind_constructors => ["new"],
     bind_methods      => [qw( Fetch_Sort_Cache )],
 );
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::DefaultSortReader",
+    class_name        => "Lucy::Index::DefaultSortReader",
     bind_constructors => ["new"],
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/SortWriter.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/SortWriter.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/SortWriter.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/SortWriter.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::SortWriter;
-use KinoSearch;
+package Lucy::Index::SortWriter;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS';
-MODULE = KinoSearch    PACKAGE = KinoSearch::Index::SortWriter
+MODULE = Lucy    PACKAGE = Lucy::Index::SortWriter
 
 void
 set_default_mem_thresh(mem_thresh)
@@ -34,7 +34,7 @@ END_XS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::SortWriter",
+    class_name        => "Lucy::Index::SortWriter",
     xs_code           => $xs_code,
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/TermInfo.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/TermInfo.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/TermInfo.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/TermInfo.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::TermInfo;
-use KinoSearch;
+package Lucy::Index::TermInfo;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Index::TermInfo",
+    class_name   => "Lucy::Index::TermInfo",
     bind_methods => [
         qw(
             Get_Doc_Freq

Modified: incubator/lucy/trunk/perl/lib/Lucy/Index/TermVector.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Index/TermVector.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Index/TermVector.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Index/TermVector.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Index::TermVector;
-use KinoSearch;
+package Lucy::Index::TermVector;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Index::TermVector",
+    class_name        => "Lucy::Index::TermVector",
     bind_constructors => ["new"],
     bind_methods      => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/BitVector.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/BitVector.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/BitVector.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/BitVector.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::BitVector;
-use KinoSearch;
+package Lucy::Object::BitVector;
+use Lucy;
 
 1;
 
@@ -38,7 +38,7 @@ END_CONSTRUCTOR
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::BitVector",
+    class_name   => "Lucy::Object::BitVector",
     bind_methods => [
         qw( Get
             Set

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/ByteBuf.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/ByteBuf.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/ByteBuf.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/ByteBuf.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::ByteBuf;
-use KinoSearch;
+package Lucy::Object::ByteBuf;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch     PACKAGE = KinoSearch::Object::ByteBuf
+MODULE = Lucy     PACKAGE = Lucy::Object::ByteBuf
 
 SV*
 new(either_sv, sv)
@@ -52,7 +52,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::ByteBuf",
+    class_name   => "Lucy::Object::ByteBuf",
     xs_code      => $xs_code,
     bind_methods => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/CharBuf.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/CharBuf.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/CharBuf.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/CharBuf.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::CharBuf;
-use KinoSearch;
+package Lucy::Object::CharBuf;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch     PACKAGE = KinoSearch::Object::CharBuf
+MODULE = Lucy     PACKAGE = Lucy::Object::CharBuf
 
 SV*
 new(either_sv, sv)
@@ -63,7 +63,7 @@ CODE:
     RETVAL = XSBind_cb_to_sv(self);
 OUTPUT: RETVAL
 
-MODULE = KinoSearch     PACKAGE = KinoSearch::Object::ViewCharBuf
+MODULE = Lucy     PACKAGE = Lucy::Object::ViewCharBuf
 
 SV*
 _new(unused, sv)
@@ -83,7 +83,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::CharBuf",
+    class_name   => "Lucy::Object::CharBuf",
     xs_code      => $xs_code,
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/Err.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/Err.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/Err.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/Err.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::Err;
-use KinoSearch;
+package Lucy::Object::Err;
+use Lucy;
 
 1;
 
@@ -42,7 +42,7 @@ END_SYNOPSIS
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Object::Err",
+    class_name        => "Lucy::Object::Err",
     bind_methods      => [qw( Cat_Mess Get_Mess )],
     make_pod          => { synopsis => $synopsis },
     bind_constructors => ["_new"],

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/Hash.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/Hash.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/Hash.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/Hash.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::Hash;
-use KinoSearch;
+package Lucy::Object::Hash;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE =  KinoSearch    PACKAGE = KinoSearch::Object::Hash
+MODULE =  Lucy    PACKAGE = Lucy::Object::Hash
 
 SV*
 _deserialize(either_sv, instream)
@@ -77,7 +77,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::Hash",
+    class_name   => "Lucy::Object::Hash",
     xs_code      => $xs_code,
     bind_methods => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/Host.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/Host.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/Host.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/Host.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::Host;
-use KinoSearch;
+package Lucy::Object::Host;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch     PACKAGE = KinoSearch::Object::Host
+MODULE = Lucy     PACKAGE = Lucy::Object::Host
 
 =for comment
 
@@ -42,7 +42,7 @@ _test_obj(...)
 CODE:
 {
     lucy_ByteBuf *test_obj = lucy_BB_new_bytes("blah", 4);
-    SV *pack_var = get_sv("KinoSearch::Object::Host::testobj", 1);
+    SV *pack_var = get_sv("Lucy::Object::Host::testobj", 1);
     RETVAL = (SV*)Lucy_BB_To_Host(test_obj);
     SvSetSV_nosteal(pack_var, RETVAL);
     LUCY_DECREF(test_obj);
@@ -99,7 +99,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel     => "Lucy",
-    class_name => "KinoSearch::Object::Host",
+    class_name => "Lucy::Object::Host",
     xs_code    => $xs_code,
 );
 

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/I32Array.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/I32Array.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/I32Array.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/I32Array.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::I32Array;
-use KinoSearch;
+package Lucy::Object::I32Array;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch PACKAGE = KinoSearch::Object::I32Array
+MODULE = Lucy PACKAGE = Lucy::Object::I32Array
 
 SV*
 new(either_sv, ...) 
@@ -35,7 +35,7 @@ CODE:
     lucy_I32Array *self = NULL;
 
     XSBind_allot_params( &(ST(0)), 1, items, 
-        "KinoSearch::Object::I32Array::new_PARAMS",
+        "Lucy::Object::I32Array::new_PARAMS",
         &ints_sv, "ints", 4,
         NULL);
     if (XSBind_sv_defined(ints_sv) && SvROK(ints_sv)) {
@@ -86,7 +86,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::I32Array",
+    class_name   => "Lucy::Object::I32Array",
     xs_code      => $xs_code,
     bind_methods => [qw( Get Get_Size )],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/LockFreeRegistry.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/LockFreeRegistry.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/LockFreeRegistry.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/LockFreeRegistry.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::LockFreeRegistry;
-use KinoSearch;
+package Lucy::Object::LockFreeRegistry;
+use Lucy;
 
 1;
 
@@ -24,7 +24,7 @@ __BINDING__
 
 Clownfish::Binding::Perl::Class->register(
     parcel            => "Lucy",
-    class_name        => "KinoSearch::Object::LockFreeRegistry",
+    class_name        => "Lucy::Object::LockFreeRegistry",
     bind_methods      => [qw( Register Fetch )],
     bind_constructors => ["new"],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/Num.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/Num.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/Num.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/Num.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::Num;
-use KinoSearch;
+package Lucy::Object::Num;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $float32_xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Object::Float32
+MODULE = Lucy   PACKAGE = Lucy::Object::Float32
 
 SV*
 new(either_sv, value)
@@ -39,7 +39,7 @@ OUTPUT: RETVAL
 END_XS_CODE
 
 my $float64_xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Object::Float64
+MODULE = Lucy   PACKAGE = Lucy::Object::Float64
 
 SV*
 new(either_sv, value)
@@ -56,13 +56,13 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::Float32",
+    class_name   => "Lucy::Object::Float32",
     xs_code      => $float32_xs_code,
     bind_methods => [qw( Set_Value Get_Value )],
 );
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::Float64",
+    class_name   => "Lucy::Object::Float64",
     xs_code      => $float64_xs_code,
     bind_methods => [qw( Set_Value Get_Value )],
 );

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/Obj.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/Obj.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/Obj.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/Obj.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::Obj;
-use KinoSearch;
+package Lucy::Object::Obj;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch     PACKAGE = KinoSearch::Object::Obj
+MODULE = Lucy     PACKAGE = Lucy::Object::Obj
 
 chy_bool_t
 is_a(self, class_name)
@@ -207,7 +207,7 @@ END_DESCRIPTION
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::Obj",
+    class_name   => "Lucy::Object::Obj",
     xs_code      => $xs_code,
     bind_methods => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/VArray.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/VArray.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/VArray.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/VArray.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::VArray;
-use KinoSearch;
+package Lucy::Object::VArray;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Object::VArray
+MODULE = Lucy   PACKAGE = Lucy::Object::VArray
 
 SV*
 shallow_copy(self)
@@ -92,7 +92,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::VArray",
+    class_name   => "Lucy::Object::VArray",
     xs_code      => $xs_code,
     bind_methods => [
         qw(

Modified: incubator/lucy/trunk/perl/lib/Lucy/Object/VTable.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/perl/lib/Lucy/Object/VTable.pm?rev=1030838&r1=1030833&r2=1030838&view=diff
==============================================================================
--- incubator/lucy/trunk/perl/lib/Lucy/Object/VTable.pm (original)
+++ incubator/lucy/trunk/perl/lib/Lucy/Object/VTable.pm Thu Nov  4 05:36:36 2010
@@ -13,8 +13,8 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 
-package KinoSearch::Object::VTable;
-use KinoSearch;
+package Lucy::Object::VTable;
+use Lucy;
 
 1;
 
@@ -23,7 +23,7 @@ __END__
 __BINDING__
 
 my $xs_code = <<'END_XS_CODE';
-MODULE = KinoSearch   PACKAGE = KinoSearch::Object::VTable
+MODULE = Lucy   PACKAGE = Lucy::Object::VTable
 
 SV*
 _get_registry()
@@ -36,7 +36,7 @@ END_XS_CODE
 
 Clownfish::Binding::Perl::Class->register(
     parcel       => "Lucy",
-    class_name   => "KinoSearch::Object::VTable",
+    class_name   => "Lucy::Object::VTable",
     xs_code      => $xs_code,
     bind_methods => [qw( Get_Name Get_Parent )],
 );