diff options
Diffstat (limited to 'rt/lib/RT/Queues_Overlay.pm')
| -rw-r--r-- | rt/lib/RT/Queues_Overlay.pm | 42 |
1 files changed, 15 insertions, 27 deletions
diff --git a/rt/lib/RT/Queues_Overlay.pm b/rt/lib/RT/Queues_Overlay.pm index 06e3e12a8..ffc1d78bb 100644 --- a/rt/lib/RT/Queues_Overlay.pm +++ b/rt/lib/RT/Queues_Overlay.pm @@ -2,7 +2,7 @@ # # COPYRIGHT: # -# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2007 Best Practical Solutions, LLC # <jesse@bestpractical.com> # # (Except where explicitly superseded by other copyright notices) @@ -22,7 +22,9 @@ # # 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/copyleft/gpl.html. # # # CONTRIBUTION SUBMISSION POLICY: @@ -43,7 +45,6 @@ # those contributions and any derivatives thereof. # # END BPS TAGGED BLOCK }}} - =head1 NAME RT::Queues - a collection of RT::Queue objects @@ -120,35 +121,22 @@ sub Limit { } # }}} -# {{{ sub Next +# {{{ sub AddRecord -=head2 Next +=head2 AddRecord -Returns the next queue that this user can see. +Adds a record object to this collection if this user can see. +This is used for filtering objects for both Next and ItemsArrayRef. =cut - -sub Next { + +sub AddRecord { my $self = shift; - - - my $Queue = $self->SUPER::Next(); - if ((defined($Queue)) and (ref($Queue))) { - - if ($Queue->CurrentUserHasRight('SeeQueue')) { - return($Queue); - } - - #If the user doesn't have the right to show this queue - else { - return($self->Next()); - } - } - #if there never was any queue - else { - return(undef); - } - + my $Queue = shift; + return unless $Queue->CurrentUserHasRight('SeeQueue'); + + push @{$self->{'items'}}, $Queue; + $self->{'rows'}++; } # }}} |