[Mason] HTML::FillInForm with fdat et fobject - overwrite?

[Cyril SUDRE]

Hi,

I'm trying to get my form working with HTML::FillInForm as described in http://www.masonhq.com/?FiltersAndHTMLFillInForm.

I have the the form:

<&| /comp/userpref.comp, data ="" $data, object => $r &>\
<form id="form_params" method="get" action="" $r->uri %>">
<input type="radio" name="choix" id="choix_1" value="1" checked="checked" />
<input type="radio" name="choix" id="choix_2" value="2" />
<input type="radio" name="choix" id="choix_3" value="3" />
<input type="submit" name="soumettre" id="soumettre" value="Sauvegarder mes paramètres" />
</form>
</&>

With /comp/userpref.comp :

<%args>
 $data ="" undef
 $object => undef
 $fill_password => 0
</%args>

<%init>
my $form = $m->content;

 if ( $data || $object )
 {
     my $filled = $fif->fill( scalarref => \$form,
                              fdat      => $data,
                              fobject   => $object,
                              fill_password => $fill_password
                            );

     $m->print($filled);
 }
 else
 {
     $m->print($form);
 }

 return;

</%init>

When i submit the form, i always get the value provided by $data, but it's never overloaded with values provided with $r->param.

I thought $r->param would overwrite values provided by fdat parameter in HTML::FillInForm.
Where am i wrong?

Thanks in advance for any help.

Cyril