<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 &amp;&amp; $col-&gt;isa('Class::DBI::Column')){
+        if (defined blessed $col and $col-&gt;isa('Class::DBI::Column')) {
             $ro_meth = $col-&gt;accessor;
</code></pre>

<p>Cheers and please keep them coming ;)</p>

<p style="font-size:small;-webkit-text-size-adjust:none;color:#666;">&mdash;<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>