<p>Looks good, merged at <a href="https://github.com/dbsrgits/dbix-class/commit/7ad80222" class="commit-link"><tt>7ad8022</tt></a>. The only adjustment (and corresponding boilerplate) was:</p>
<pre><code> my($ro_meth, $wo_meth);
- if (ref $col && $col->isa('Class::DBI::Column')){
+ if (defined blessed $col and $col->isa('Class::DBI::Column')) {
$ro_meth = $col->accessor;
</code></pre>
<p>Cheers and please keep them coming ;)</p>
<p style="font-size:small;-webkit-text-size-adjust:none;color:#666;">—<br>Reply to this email directly or <a href="https://github.com/dbsrgits/dbix-class/pull/52#issuecomment-49961156">view it on GitHub</a>.<img alt="" height="1" src="https://github.com/notifications/beacon/302594__eyJzY29wZSI6Ik5ld3NpZXM6QmVhY29uIiwiZXhwaXJlcyI6MTcyMTc4ODUyNiwiZGF0YSI6eyJpZCI6Mzc1MjEwOTl9fQ==--ff0fcee90ad7d3195335d83dc7f978ae78de9b23.gif" width="1" /></p>