package
Weed::FieldTypes::SFImage;
our
$VERSION
=
'0.009'
;
sub
setValue {
my
(
$this
,
@value
) =
@_
;
if
( UNIVERSAL::isa(
$value
[0],
'X3DField'
) ) {
return
$this
->X3DField::setValue(
$value
[0]->getValue->getClone )
if
UNIVERSAL::isa(
$value
[0],
'SFImage'
);
@value
=
map
{ 0 +
$_
}
@value
;
}
$this
->X3DField::setValue( new X3DImage(
@value
) );
}
sub
toString {
return
$_
[0]->getValue->toString;
}
1;
__END__