<div dir="ltr">My email coding has some syntax errors, apologies.<br></div><div class="gmail_extra"><br><div class="gmail_quote">On Sat, Dec 10, 2016 at 4:50 PM, LNATION . <span dir="ltr"><<a href="mailto:thisusedtobeanemail@gmail.com" target="_blank">thisusedtobeanemail@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div>and then make a role role<br><br></div>has default_column_spec => ( ...)<br><div><br><div>before render => sub {<br></div><div> while (my ($field, $default) = each %{ $_[0]->default_column_spec}{<br></div><div> unless ($_[0]->field($filed)->value) { # mayb editing </div><div> $_[0]->field('$field)->value($<wbr>default);</div><div> }</div><div> }</div>}<br><br></div></div><div class="HOEnZb"><div class="h5"><div class="gmail_extra"><br><div class="gmail_quote">On Sat, Dec 10, 2016 at 4:41 PM, LNATION . <span dir="ltr"><<a href="mailto:thisusedtobeanemail@gmail.com" target="_blank">thisusedtobeanemail@gmail.com</a><wbr>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div><div>maybe something like ......<br><br><div> my $columns = $result->result_source->column<wbr>s_info;<br> my %default_form_spec;<br> for my $name (keys %{$columns}){<br> if (my $default = $columns->{$name}->{default_va<wbr>lue}) {<br> $default_form_spec{ $name } = $default;<br> } <br> }<br></div><br></div><br></div></div>
</blockquote></div><br></div>
</div></div></blockquote></div><br></div>