SIOC::Role - SIOC Role class


SIOC documentation Contained in the SIOC distribution.

Index


Code Index:

NAME

Top

SIOC::Role -- SIOC Role class

VERSION

Top

This documentation refers to SIOC::Role version 1.0.0.

SYNOPSIS

Top

   use SIOC::Role;

DESCRIPTION

Top

Roles are used to express functions or access control privileges that Users may have.

CLASS ATTRIBUTES

Top

owner

A User who has this Role.

scope

Forums that this Role applies to.

SUBROUTINES/METHODS

Top

TODO: document methods

DIAGNOSTICS

Top

For diagnostics information, see the SIOC base class.

CONFIGURATION AND ENVIRONMENT

Top

This module doesn't need configuration.

DEPENDENCIES

Top

This module depends on the following modules:

INCOMPATIBILITIES

Top

There are no known incompatibilities.

BUGS AND LIMITATIONS

Top

There are no known bugs in this module.

Please report problems via the bug tracking system on the perl-SIOC project website: http://developer.berlios.de/projects/perl-sioc/.

Patches are welcome.

AUTHOR

Top

Jochen Lillich <geewiz@cpan.org>

LICENSE AND COPYRIGHT

Top


SIOC documentation Contained in the SIOC distribution.

###########################################################
# SIOC::Role
# Role class for the SIOC ontology
###########################################################
#
# $Id: Role.pm 10 2008-03-01 21:38:39Z geewiz $
#

package SIOC::Role;

use strict;
use warnings;

use version; our $VERSION = qv(1.0.0);

use Moose;

extends 'SIOC';

### optional attributes

has 'owner' => (
    isa => 'SIOC::User',
    is => 'rw',
);

has 'scope' => (
    isa => 'SIOC::Forum',
    is => 'rw',
);

### methods

after 'fill_template' => sub {
    my ($self) = @_;
    
    $self->set_template_vars({
        function_of => $self->function_of,
        scope => $self->scope
    });
};

### EOC

1;
__END__