/usr/local/CPAN/mobirc/App/Mobirc/Model/Message.pm

• package App::Mobirc::Model::Message
• EOF

package App::Mobirc::Model::Message;
use Moose;
use Moose::Util::TypeConstraints;

has channel => (
    is       => 'rw',
    isa      => 'Any',
);

has who => (
    is  => 'ro',
    isa => 'Str | Undef',
);

has body => (
    is  => 'ro',
    isa => 'Str',
);

has class => (
    is  => 'ro',
    isa => 'Str',
);

has 'time' => (
    is      => 'ro',
    isa     => 'Int',
    default => sub { time() },
);

__PACKAGE__->meta->make_immutable;
1;