search-xapian/Xapian/PerlStopper.pm

   1 package Search::Xapian::PerlStopper;
   2
   3 use 5.006;
   4 use strict;
   5 use warnings;
   6
   7 use Search::Xapian::Stopper;
   8
   9 @Search::Xapian::PerlStopper::ISA = qw(Search::Xapian::Stopper);
  10
  11 # In a new thread, copy objects of this class to unblessed, undef values.
  12 sub CLONE_SKIP { 1 }
  13
  14 1;