On Tue, Nov 03, 2009 at 11:09:19AM -0600, Evan Carroll wrote:
> around 'attribute' => sub {
> my ($next, $this, $key) = @_;
> unless ( $this->meta->get_attribute('attribute')->has_init_arg ) {
> if ( $key ) {
> $self->has_attribute ? die 'exception' :
> $this->$next($key);
> }
> else {
> $this->$next
> }
> }
> };Ummm... no, that's not what has_init_arg does at all. -doy
