=cut
-has name => ( is => 'rw', coerce => sub { defined $_[0] ? $_[0] : '' }, default => quote_sub(q{ '' }) );
+has name => ( is => 'rw', coerce => quote_sub(q{ defined $_[0] ? $_[0] : '' }), default => quote_sub(q{ '' }) );
=head2 options
my $type = uc $_[0] or return;
throw("Invalid index type: $type") unless $VALID_INDEX_TYPE{$type};
},
- coerce => sub { uc $_[0] },
+ coerce => quote_sub(q{ uc $_[0] }),
default => quote_sub(q{ 'NORMAL' }),
);