diff options
Diffstat (limited to 'rt/lib/RT/ScripActions_Overlay.pm')
| -rw-r--r-- | rt/lib/RT/ScripActions_Overlay.pm | 87 | 
1 files changed, 0 insertions, 87 deletions
| diff --git a/rt/lib/RT/ScripActions_Overlay.pm b/rt/lib/RT/ScripActions_Overlay.pm deleted file mode 100644 index 83cd646ef..000000000 --- a/rt/lib/RT/ScripActions_Overlay.pm +++ /dev/null @@ -1,87 +0,0 @@ -# BEGIN LICENSE BLOCK -#  -# Copyright (c) 1996-2003 Jesse Vincent <jesse@bestpractical.com> -#  -# (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 -=head1 NAME - -  RT::ScripActions - Collection of Action objects - -=head1 SYNOPSIS - -  use RT::ScripActions; - - -=head1 DESCRIPTION - - -=begin testing - -ok (require RT::ScripActions); - -=end testing - -=head1 METHODS - -=cut - -use strict; -no warnings qw(redefine); - -# {{{ sub _Init -sub _Init {  -  my $self = shift; -  $self->{'table'} = "ScripActions"; -  $self->{'primary_key'} = "id"; -  return ( $self->SUPER::_Init(@_)); -} -# }}} - -# {{{ sub LimitToType  -sub LimitToType  { -  my $self = shift; -  my $type = shift; -  $self->Limit (ENTRYAGGREGATOR => 'OR', -		FIELD => 'Type', -		VALUE => "$type") -      if defined $type; -  $self->Limit (ENTRYAGGREGATOR => 'OR', -		FIELD => 'Type', -		VALUE => "Correspond") -      if $type eq "Create"; -  $self->Limit (ENTRYAGGREGATOR => 'OR', -		FIELD => 'Type', -		VALUE => 'any'); -   -} -# }}} - -# {{{ sub NewItem  -sub NewItem  { -  my $self = shift; -  return(RT::ScripAction->new($self->CurrentUser)); - -} -# }}} - - -1; - | 
