'resourcetext' => bless( { 'name' => bless( { 'name' => 'resourceText', '_groups' => { 'All' => 1 }, 'mutator' => 'resourceText', 'placeholder' => '?', 'accessor' => 'resourceText' }, 'Class::DBI::Column' ), '_tag' => 'input', 'type' => 'text' # I'm expecting 'textarea' }, 'HTML::Element' ), #### # Right, have some of this! eval "package $class; Class::DBI::Plugin::Type->import()"; my $type = $class->column_type($field); return $self->_to_textarea($field) if $type and $type =~ /^(TEXT|BLOB)$/i; return $self->_to_textfield($field); #### print My::ClassName->column_type('resourceText'), $/; #### #if ($caller->isa("Class::DBI::mysql") and $caller->can("column_type")) { # return; # My work here is done #}