and make it really work :-)
git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@838
07558da8-63fa-0310-ba24-
9fe276d99e06
$self->{_delimiters_templates}->{$f}->{$template}++;
if ( my $v = $self->{_validate_delimiters_templates} ) {
- if ( ! defined( $v->{$template} ) ) {
+ if ( ! defined( $v->{$f}->{$template} ) ) {
$errors->{$f}->{invalid_delimiters_combination} = $template;
$errors->{$f}->{dump} = $subfield_dump;
- } else {
- warn "## $f $template ok\n";
+ #} else {
+ # warn "## $f $template ok\n";
}
}
}