[Rt-commit] r16476 - rt/branches/3.999-DANGEROUS/lib/RT/Model
ruz at bestpractical.com
ruz at bestpractical.com
Tue Oct 21 22:22:59 EDT 2008
Author: ruz
Date: Tue Oct 21 22:22:58 2008
New Revision: 16476
Modified:
rt/branches/3.999-DANGEROUS/lib/RT/Model/Queue.pm
Log:
* delete methods in RT 4.0 from queue model, all those are
duplicated in StatusSchema
Modified: rt/branches/3.999-DANGEROUS/lib/RT/Model/Queue.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Model/Queue.pm (original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Model/Queue.pm Tue Oct 21 22:22:58 2008
@@ -194,109 +194,6 @@
}
-=head2 active_status_array
-
-Returns an array of all ActiveStatuses for this queue
-
-=cut
-
-sub active_status_array {
- my $self = shift;
- if ( RT->config->get('ActiveStatus') ) {
- return ( RT->config->get('ActiveStatus') );
- } else {
- Jifty->log->warn("RT::ActiveStatus undefined, falling back to deprecated defaults");
- return (@DEFAULT_ACTIVE_STATUS);
- }
-}
-
-
-
-=head2 inactive_status_array
-
-Returns an array of all InactiveStatuses for this queue
-
-=cut
-
-sub inactive_status_array {
- my $self = shift;
- if ( RT->config->get('InactiveStatus') ) {
- return ( RT->config->get('InactiveStatus') );
- } else {
- Jifty->log->warn( "RT::InactiveStatus undefined, falling back to deprecated defaults" );
- return (@DEFAULT_INACTIVE_STATUS);
- }
-}
-
-
-
-=head2 status_array
-
-Returns an array of all statuses for this queue
-
-=cut
-
-sub status_array {
- my $self = shift;
- return ( $self->active_status_array(), $self->inactive_status_array() );
-}
-
-
-
-=head2 is_valid_status value
-
-Returns true if value is a valid status. Otherwise, returns 0.
-
-
-=cut
-
-sub is_valid_status {
- my $self = shift;
- my $value = shift;
-
- my $retval = grep ( $_ eq $value, $self->status_array );
- return ($retval);
-
-}
-
-
-
-=head2 is_active_status value
-
-Returns true if value is a Active status. Otherwise, returns 0
-
-
-=cut
-
-sub is_active_status {
- my $self = shift;
- my $value = shift;
-
- my $retval = grep ( $_ eq $value, $self->active_status_array );
- return ($retval);
-
-}
-
-
-
-=head2 is_inactive_status value
-
-Returns true if value is a Inactive status. Otherwise, returns 0
-
-
-=cut
-
-sub is_inactive_status {
- my $self = shift;
- my $value = shift;
-
- my $retval = grep ( $_ eq $value, $self->inactive_status_array );
- return ($retval);
-
-}
-
-
-
=head2 create(ARGS)
Arguments: ARGS is a hash of named parameters. Valid parameters are:
More information about the Rt-commit
mailing list