diff options
author | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-08-12 06:17:09 +0000 |
commit | 3ef62a0570055da710328937e7f65dbb2c027c62 (patch) | |
tree | d549158b172fd499b4f81a2981b62aabbde4f99b /rt/lib/RT/ScripConditions.pm | |
parent | 030438c9cb1c12ccb79130979ef0922097b4311a (diff) |
import rt 2.0.14
Diffstat (limited to 'rt/lib/RT/ScripConditions.pm')
-rwxr-xr-x | rt/lib/RT/ScripConditions.pm | 69 |
1 files changed, 69 insertions, 0 deletions
diff --git a/rt/lib/RT/ScripConditions.pm b/rt/lib/RT/ScripConditions.pm new file mode 100755 index 000000000..236e6718d --- /dev/null +++ b/rt/lib/RT/ScripConditions.pm @@ -0,0 +1,69 @@ +#$Header: /home/cvs/cvsroot/freeside/rt/lib/RT/ScripConditions.pm,v 1.1 2002-08-12 06:17:07 ivan Exp $ + +=head1 NAME + + RT::ScripConditions - Collection of Action objects + +=head1 SYNOPSIS + + use RT::ScripConditions; + + +=head1 DESCRIPTION + + + +=begin testing + +ok (require RT::TestHarness); +ok (require RT::ScripConditions); + +=end testing + +=head1 METHODS + +=cut + +package RT::ScripConditions; +use RT::EasySearch; +use RT::ScripCondition; +@ISA= qw(RT::EasySearch); + +# {{{ sub _Init +sub _Init { + my $self = shift; + $self->{'table'} = "ScripConditions"; + $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::ScripCondition->new($self->CurrentUser)); +} +# }}} + + +1; + |