X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Flib%2FRT%2FAttributes.pm;h=f5e84a4d12b8debd893d5845dc0ef8fbd1326fe1;hb=026dc7ad72ba972f230b6709e31fa64397d75ad4;hp=7da2932628cdee1140b8abab5618707d9c98544c;hpb=919e930aa9279b3c5cd12b593889cd6de79d67bf;p=freeside.git diff --git a/rt/lib/RT/Attributes.pm b/rt/lib/RT/Attributes.pm index 7da293262..f5e84a4d1 100644 --- a/rt/lib/RT/Attributes.pm +++ b/rt/lib/RT/Attributes.pm @@ -68,11 +68,10 @@ package RT::Attributes; use strict; use warnings; +use base 'RT::SearchBuilder'; use RT::Attribute; -use base 'RT::SearchBuilder'; - sub Table { 'Attributes'} @@ -140,23 +139,6 @@ sub Named { return (@attributes); } -=head2 WithId ID - -Returns the RT::Attribute objects with the id ID - -XXX TODO XXX THIS NEEDS A BETTER ACL CHECK - -=cut - -sub WithId { - my $self = shift; - my $id = shift; - - my $attr = RT::Attribute->new($self->CurrentUser); - $attr->LoadByCols( id => $id ); - return($attr); -} - =head2 DeleteEntry { Name => Content => , id => } Deletes attributes with @@ -218,18 +200,6 @@ sub LimitToObject { } - - -=head2 NewItem - -Returns an empty new RT::Attribute item - -=cut - -sub NewItem { - my $self = shift; - return(RT::Attribute->new($self->CurrentUser)); -} RT::Base->_ImportOverlays(); 1;