diff options
author | yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b> | 2008-07-08 11:20:42 +0000 |
---|---|---|
committer | yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b> | 2008-07-08 11:20:42 +0000 |
commit | 0d177e5bfb3ffd531f8904d99758cbc171261cdb (patch) | |
tree | e4dfe7b8341bdacb96614da11fe3a48752b0d0c9 | |
parent | 3029c4af4b5a7bffa78f96fb9b02c37a2b36891a (diff) |
Bugfix: a tag can only be added one time to a thread
git-svn-id: svn://vndb.org/vndb@59 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b
-rw-r--r-- | lib/VNDB/Discussions.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/VNDB/Discussions.pm b/lib/VNDB/Discussions.pm index 233b41da..cebed80a 100644 --- a/lib/VNDB/Discussions.pm +++ b/lib/VNDB/Discussions.pm @@ -62,7 +62,7 @@ sub TEdit { ); $frm->{msg} =~ s/[\r\s\n]$//g; - my @tags = !$frm->{tags} || $frm->{_err} ? () : map { + my %tags = !$frm->{tags} || $frm->{_err} ? () : map { $frm->{_err} = [ 'wrongtag' ] if !/^([a-z]{1,2})([0-9]*)$/ || !$VNDB::DTAGS->{$1} || $1 eq 'v' && (!$2 || !$self->DBGetVN(id => $2)->[0]) @@ -70,8 +70,9 @@ sub TEdit { || $1 eq 'p' && (!$2 || !$self->DBGetProducer(id => $2)->[0]) || $1 eq 'u' && (!$2 || !$self->DBGetUser(id => $2)->[0]) || $1 eq 'an' && !$self->AuthCan('boardmod'); - [ $1, $2||0 ] + $1.($2||0) => [ $1, $2||0 ] } split / /, $frm->{tags}; + my @tags = values %tags; if(!$frm->{_err}) { my $otid = $tid; |