discourse-legacysite-perl/site/slowtwitch.com/cgi-bin/articles/GT/SQL/Search/NONINDEXED/Indexer.pm
2024-06-17 21:49:12 +10:00

26 lines
794 B
Perl

# ====================================================================
# Gossamer Threads Module Library - http://gossamer-threads.com/
#
# GT::SQL::Search::NONINDEXED::Indexer
# Author: Aki Mimoto
# CVS Info : 087,071,086,086,085
# $Id: Indexer.pm,v 1.3 2004/01/13 01:35:20 jagerman Exp $
#
# Copyright (c) 2004 Gossamer Threads Inc. All Rights Reserved.
# ====================================================================
#
package GT::SQL::Search::NONINDEXED::Indexer;
#--------------------------------------------------------------------------------
use strict;
use vars qw/@ISA $DEBUG/;
use GT::SQL::Search::Base::Indexer;
@ISA = qw/ GT::SQL::Search::Base::Indexer /;
sub load {
shift;
return GT::SQL::Search::NONINDEXED::Indexer->new(@_)
}
1;