[html-formfu] Model::DBIC and nested blocks not updating

[Charlie Garrison]

Good afternoon,

On 9/09/09 at 12:02 AM +0200, Mario Minati 
<mario.minati at googlemail.com> wrote:

>could you add the content of $value in _save_columns, or setup 
>a (failing) test from your problem, that would ease the debugging.

Some of my tests did include $value, and it always matched the 
contents of the listed field. But for completeness, there is 
some of that log below.

I wasn't sure about writing tests. I wrote one for an 
auto_fieldset bug a while back, and AFAIK it hasn't received any 
attention. I also sent a patch recently for Unique.pm, hopefully 
that can get applied (or I can get a commit bit so I can apply 
it). I'm using the r1595 version of HTML-FormFu-Model-DBIC from svn.

Anyway, when looking through the tests and running some of them, 
I remembered there was one test failure when I installed 
HTML-FormFu-Model-DBIC last time (don't recall whether test 
failed with earlier versions). The failing test output is:

t/update/nested_repeatable_write.........................................1/7
#   Failed test at t/update/nested_repeatable_write.t line 75.
#          got: 'action item 2'
#     expected: 'new action item 2'
# Looks like you failed 1 test of 7.
t/update/nested_repeatable_write......................................... 
Dubious, test returned 1 (wstat 256, 0x100)
  Failed 1/7 subtests

And looking at that test, it seems to be the same problem I'm 
having. So looks like I lucked out and don't need to write a new test.

I'm happy to help fix it, but I don't really follow all of the 
nested logic so it's a hard one for me to figure out. Either a 
bugfix or help making sense of the code would be appreciated.

Thanks,
Charlie

PS. I don't know if it's related, but why are all those $dbic 
objects from my Catalyst "DBIC" model rather than my DBIC 
"Schema"? I would have expected those $dbic objects to be (eg) 
MyApp::Schema::Result::User class. Is that indicative of a 
config problem in my HTML::FormFu conf?

# debug.log:
doing update for: MyApp::Model::DBIC::User
doing save_columns for: MyApp::Model::DBIC::User
save_columns for: username
save_columns - value for: cgtest8983
save_columns for: password
save_columns - value for: pass
save_columns for: password_c
save_columns - value for: pass
save_columns for: name_prefix
save_columns - value for: Mr
save_columns for: name_first
save_columns - value for: Charlie
save_columns for: name_last
save_columns - value for: Garrison
save_columns for: email
save_columns - value for: garrison at zeta.org.au
save_columns for: register_as
save_columns - value for: customer
save_columns for: submit
save_columns - value for: Submit
save_columns for: id
save_columns - value for:
finished save_columns for: MyApp::Model::DBIC::User

doing update for: MyApp::Model::DBIC::Customer
doing save_columns for: MyApp::Model::DBIC::Customer
save_columns for: name_company
save_columns - value for: GCS
save_columns for: id
save_columns - value for:
save_columns for: addr_count
save_columns - value for:

doing update - rels for: MyApp::Model::DBIC::Customer
doing save_rels for: MyApp::Model::DBIC::Customer
save_rels - got valid rel for: addresses
save_rels - block - has_many for: addresses

doing save_has_many for: MyApp::Model::DBIC::Customer
save_has_many - block for: customer.addresses_1.id
save_has_many - block - insert for: customer.addresses_1.id
doing insert_has_many for: MyApp::Model::DBIC::Customer
insert_has_many - new_related for: addresses
save_has_many - block - update for: customer.addresses_1.id

doing update for: MyApp::Model::DBIC::Address
doing save_columns for: MyApp::Model::DBIC::Address
save_columns for: name_company
save_columns - value for: GCS
save_columns for: id
save_columns - value for:
save_columns for: addr_count
save_columns - value for:



-- 
    Charlie Garrison  <garrison at zeta.org.au>
    PO Box 141, Windsor, NSW 2756, Australia

O< ascii ribbon campaign - stop html mail - www.asciiribbon.org
http://www.ietf.org/rfc/rfc1855.txt