File Coverage

blib/lib/WWW/Mechanize/FormFiller/Value/Fixed.pm

Criterion	Covered	Total	%
statement	26	26	100.0
branch			n/a
condition			n/a
subroutine	7	7	100.0
pod	2	2	100.0
total	35	35	100.0

package WWW::Mechanize::FormFiller::Value::Fixed;
use base 'WWW::Mechanize::FormFiller::Value';
use strict;

use vars qw( $VERSION );
$VERSION = '0.12';

sub new {
  my ($class,$name,$value) = @_;
  my $self = $class->SUPER::new($name);
  $self->{value} = $value;

  $self;
};

sub value { $_[0]->{value} };

1;
__END__