sub choose { if ( ! $_[0]->isa( 'Term_Choose' ) ) { my $n = Term_Choose->new(); return $n->choose( @_ ); } my $self = shift; return @_; }