use strict;
use warnings;

package IMS::CP::Resource::File;
BEGIN {
  $IMS::CP::Resource::File::VERSION = '0.0.2';
}
use Moose;
with 'XML::Rabbit::Node';

# ABSTRACT: One file inside a resource


has 'href' => (
    isa         => 'Str',
    traits      => [qw/XPathValue/],
    xpath_query => './@href',
);


has 'id' => (
    isa         => 'Str',
    traits      => [qw/XPathValue/],
    xpath_query => './cp:metadata/lom:lom/lom:general/lom:identifier',
);


has 'title' => (
    isa         => 'IMS::LOM::LangString',
    traits      => [qw/XPathObject/],
    xpath_query => './cp:metadata/lom:lom/lom:general/lom:title',
);

no Moose;
__PACKAGE__->meta->make_immutable();

1;

__END__
=pod

=encoding utf-8

=head1 NAME

IMS::CP::Resource::File - One file inside a resource

=head1 VERSION

version 0.0.2

=head1 ATTRIBUTES

=head2 href

The URI associated with the file.

=head2 id

The identifier for the file.

=head2 title

The title of the file.

=head1 AUTHOR

  Robin Smidsrød <robin@smidsrod.no>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2010 by Robin Smidsrød.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut