# $Id: Trivium.pm 7370 2012-04-09 01:17:33Z chris $
=head1 NAME
WebService::IMDB::Trivium
=head1 DESCRIPTION
WebService::IMDB::Trivium isa L<WebService::IMDB::DateText>.
=cut
use strict;
our $VERSION = '0.05';
__PACKAGE__->mk_accessors(qw(
spoiler
));
=head1 METHODS
=head2 spoiler
=cut
sub _new {
my $class = shift;
my $ws = shift;
my $data = shift or die;
my $spoiler = shift;
my $self = WebService::IMDB::DateText->_new($ws, $data);
bless $self, $class;
if (defined $spoiler) { $self->spoiler($spoiler); }
return $self;
}
1;