Revision 469 (by ahitrov, 2014/12/24 13:57:26) Moving Contenido to Apache 2

 
<%args>
	$object => undef
	$name => undef
	$SETS => undef
</%args>
<%init>

    return undef unless ref $SETS;
    return undef unless $name;

    return undef if $SETS->{$name} eq '';
    return undef if $SETS->{$name} =~ /\D/;
    return $SETS->{$name};

</%init>