use strict;
use warnings;
+use base 'RT::SearchBuilder';
use RT::Link;
-use base 'RT::SearchBuilder';
-
sub Table { 'Links'}
sub Limit {
my $self = shift;
my %args = ( ENTRYAGGREGATOR => 'AND',
- OPERATOR => '=',
- @_);
+ OPERATOR => '=',
+ @_);
# If we're limiting by target, order by base
# (Order by the thing that's changing)
- if ( ($args{'FIELD'} eq 'Target') or
- ($args{'FIELD'} eq 'LocalTarget') ) {
- $self->OrderByCols(
+ if ( ($args{'FIELD'} eq 'Target') or
+ ($args{'FIELD'} eq 'LocalTarget') ) {
+ $self->OrderByCols(
{ ALIAS => 'main', FIELD => 'LocalBase', ORDER => 'ASC' },
{ ALIAS => 'main', FIELD => 'Base', ORDER => 'ASC' },
);
}
- elsif ( ($args{'FIELD'} eq 'Base') or
- ($args{'FIELD'} eq 'LocalBase') ) {
- $self->OrderByCols(
+ elsif ( ($args{'FIELD'} eq 'Base') or
+ ($args{'FIELD'} eq 'LocalBase') ) {
+ $self->OrderByCols(
{ ALIAS => 'main', FIELD => 'LocalTarget', ORDER => 'ASC' },
{ ALIAS => 'main', FIELD => 'Target', ORDER => 'ASC' },
);
}
-
+
$self->SUPER::Limit(%args);
}
# }}}
-=head2 NewItem
-
-Returns an empty new RT::Link item
-
-=cut
-
-sub NewItem {
- my $self = shift;
- return(RT::Link->new($self->CurrentUser));
-}
-
sub AddRecord {
my $self = shift;
my $record = shift;
return unless $self->IsValidLink($record);
push @{$self->{'items'}}, $record;
- $self->{'rows'}++;
}
=head2 IsValidLink