The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

NAME

Pangloss::Term::Status - the status of a term.

SYNOPSIS

my $status = new Pangloss::Term::Status();
$status->pending()
->notes( $text )
->creator( $user )
->date( time );
do { ... } if $status->is_pending();

DESCRIPTION

This class represents a status associated with a term. It inherits from Pangloss::StoredObject::Common.

FLAGS

The following flags are available as class variables:

PENDING
APPROVED
REJECTED
DEPRECATED

They are also available as a hash with lowercase keys via $class->status_codes.

METHODS

$obj->code

internal method to set/get status code.

$obj = $obj->pending, $obj->accepted, $obj->rejected, $obj->deprecated

set this status code to one of the above. At present, multiple flags can only be set (ie: approved | deprecated) by setting $obj->code directly.

$bool = $obj->is_pending, $obj->is_accepted, $obj->is_rejected, $obj->is_deprecated

test if this status code is one of the above.

AUTHOR

Steve Purkis <spurkis@quiup.com>

SEE ALSO

Pangloss::Term