X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=rt%2Flib%2FRT%2FSearch%2FFromSQL.pm;h=dbcad909911622b0244784046007c30996730a25;hp=5d9d6706f1ad57a771ae9abfa713af92f1540ee5;hb=9aee669886202be7035e6c6049fc71bc99dd3013;hpb=d39d52aac8f38ea9115628039f0df5aa3ac826de diff --git a/rt/lib/RT/Search/FromSQL.pm b/rt/lib/RT/Search/FromSQL.pm index 5d9d6706f..dbcad9099 100644 --- a/rt/lib/RT/Search/FromSQL.pm +++ b/rt/lib/RT/Search/FromSQL.pm @@ -1,38 +1,40 @@ -# {{{ BEGIN BPS TAGGED BLOCK -# +# BEGIN BPS TAGGED BLOCK {{{ +# # COPYRIGHT: -# -# This software is Copyright (c) 1996-2004 Best Practical Solutions, LLC -# -# +# +# This software is Copyright (c) 1996-2015 Best Practical Solutions, LLC +# +# # (Except where explicitly superseded by other copyright notices) -# -# +# +# # LICENSE: -# +# # This work is made available to you under the terms of Version 2 of # the GNU General Public License. A copy of that license should have # been provided with this software, but in any event can be snarfed # from www.gnu.org. -# +# # This work is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. -# +# # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. -# -# +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA +# 02110-1301 or visit their web page on the internet at +# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html. +# +# # CONTRIBUTION SUBMISSION POLICY: -# +# # (The following paragraph is not intended to limit the rights granted # to you to modify and distribute this software under the terms of # the GNU General Public License and is only of importance to you if # you choose to contribute your changes and enhancements to the # community by submitting them to Best Practical Solutions, LLC.) -# +# # By intentionally submitting any modifications, corrections or # derivatives to this work, or any other work intended for use with # Request Tracker, to Best Practical Solutions, LLC, you confirm that @@ -41,31 +43,9 @@ # royalty-free, perpetual, license to use, copy, create derivative # works based on those contributions, and sublicense and distribute # those contributions and any derivatives thereof. -# -# }}} END BPS TAGGED BLOCK -# BEGIN LICENSE BLOCK -# -# Copyright (c) 1996-2003 Jesse Vincent -# -# (Except where explictly superceded by other copyright notices) -# -# This work is made available to you under the terms of Version 2 of -# the GNU General Public License. A copy of that license should have -# been provided with this software, but in any event can be snarfed -# from www.gnu.org. -# -# This work is distributed in the hope that it will be useful, but -# WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -# General Public License for more details. -# -# Unless otherwise specified, all modifications, corrections or -# extensions to this work which alter its source code become the -# property of Best Practical Solutions, LLC when submitted for -# inclusion in the work. -# -# -# END LICENSE BLOCK +# +# END BPS TAGGED BLOCK }}} + =head1 NAME RT::Search::FromSQL @@ -79,11 +59,6 @@ Find all tickets described by the SQL statement passed as an argument =head1 METHODS -=begin testing - -ok (require RT::Search::Generic); - -=end testing =cut @@ -91,7 +66,8 @@ ok (require RT::Search::Generic); package RT::Search::FromSQL; use strict; -use base qw(RT::Search::Generic); +use warnings; +use base qw(RT::Search); =head2 Describe @@ -99,12 +75,10 @@ Returns a localized string describing the module's function. =cut -# {{{ sub Describe sub Describe { my $self = shift; return ($self->loc("TicketSQL search module", ref $self)); } -# }}} =head2 Prepare @@ -114,18 +88,13 @@ is reduced to those tickets matching the SQL query. =cut -# {{{ sub Prepare sub Prepare { my $self = shift; $self->TicketsObj->FromSQL($self->Argument); return(1); } -# }}} -eval "require RT::Search::FromSQL_Vendor"; -die $@ if ($@ && $@ !~ qr{^Can't locate RT/Search/FromSQL_Vendor.pm}); -eval "require RT::Search::FromSQL_Local"; -die $@ if ($@ && $@ !~ qr{^Can't locate RT/Search/FromSQL_Local.pm}); +RT::Base->_ImportOverlays(); 1;