1 package Reaction::UI::ViewPort::InterfaceModel::Field::File;
4 use Reaction::Types::File;
6 use namespace::clean -except => [ qw(meta) ];
7 extends 'Reaction::UI::ViewPort::InterfaceModel::Field';
11 has '+value' => (isa => 'File', required => 0);
13 override apply_our_events => sub {
14 my ($self, $ctx, $events) = @_;
15 my $value_key = join(':', $self->location, 'value');
16 if (my $upload = $ctx->req->upload($value_key)) {
17 local $events->{$value_key} = $upload;
24 __PACKAGE__->meta->make_immutable;
31 Reaction::UI::ViewPort::Field::File
37 =head2 L<Reaction::UI::ViewPort::Field>
41 See L<Reaction::Class> for authors.
45 See L<Reaction::Class> for the license.