diff options
author | yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b> | 2008-06-23 18:04:02 +0000 |
---|---|---|
committer | yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b> | 2008-06-23 18:04:02 +0000 |
commit | 7fec4649f9019bc4d2f474d2e498daed20d47764 (patch) | |
tree | 5ead248b786dbd368f51efc6771b408c9cdc7930 /data/tpl/defs.pl | |
parent | 18f2b6fd64f1eb32f32b0b193042ee0feb513058 (diff) |
Fixed an internal server error triggered by a maxlength or minlength violation
git-svn-id: svn://vndb.org/vndb@34 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b
Diffstat (limited to 'data/tpl/defs.pl')
-rw-r--r-- | data/tpl/defs.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/data/tpl/defs.pl b/data/tpl/defs.pl index 1f2056a7..40bad445 100644 --- a/data/tpl/defs.pl +++ b/data/tpl/defs.pl @@ -319,7 +319,7 @@ sub formerr { my $ret = '<span class="warning"> Error:<ul>'; $ret .= sprintf " <li>%s</li>\n", - /^([a-z0-9_]+)_([0-9]+)_?(.*)$/ ? &{$formerr_msgs[$2-1]}($formerr_names{$1}||$1, $3||'') : $formerr_exeptions{$_} + /^([a-z0-9_]+)-([0-9]+)(?:-(.+))?$/ ? &{$formerr_msgs[$2-1]}($formerr_names{$1}||$1, $3||'') : $formerr_exeptions{$_} foreach (@err); $ret .= "</ul>\n</span>\n"; } |