The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Form::Factory::Feature::Control::FillOnAssignment - Control gets the value of the attribute

VERSION

version 0.015

SYNOPSIS

  package MyApp::Action::Thing;
  use Form::Factory::Processor;

  has_control title => (
      control   => 'text',
      features  => {
          fill_on_assignment => 1,
      },
  );

  package Somewhere::Else;

  my $interface = Form::Factory->new_interface('HTML');
  my $action = $itnerface->new_action('MyApp::Action::Thing' => {
      title => 'Some preset title',
  });

  $action->render; # outputs an INPUT with value="Some preset title"

  $action->title('A different value');

  $action->render; # outputs an INPUT with value="A different value"

DESCRIPTION

This feature adds a trigger to the control so that any assignment to the action value causes the control to also gain that value.

METHODS

check_control

No op.

build_attribute

This modifies the attribute being created to have a trigger that causes the default value of the control to gain the value of the action's attribute on set. Unless no_warning is set, this will cause a warning if the "is" setting is not set to "rw".

BUILD

After building the feature, this will set the default value of the control to the value currently held by the action attribute.

AUTHOR

Andrew Sterling Hanenkamp <hanenkamp@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2009 Qubling Software LLC.

This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself.