diff options
-rw-r--r-- | data/lang.txt | 31 | ||||
-rw-r--r-- | lib/VNDB/Handler/Releases.pm | 16 | ||||
-rw-r--r-- | lib/VNDB/Handler/ULists.pm | 11 |
3 files changed, 22 insertions, 36 deletions
diff --git a/data/lang.txt b/data/lang.txt index 515e0715..3f95964c 100644 --- a/data/lang.txt +++ b/data/lang.txt @@ -3258,25 +3258,18 @@ hu : nincs a listádba nl : niet op je lijst :_relinfo_user_inlist -en : Status: [_1] / [_2] -ru : Статус: [_1] / [_2] -cs : Status: [_1] / [_2] -hu : Állapot: [_1] / [_2] -nl : - -:_relinfo_user_setr -en : Set release status -ru : Установка статуса выпуска -cs : Změnit status vydání -hu : Kiadás állapotának módosítása -nl : Zet uitgavestatus - -:_relinfo_user_setv -en : Set play status -ru : Установка статуса игры -cs : Změnit herní status -hu : Játszás állapotának módosítása -nl : Zet speelstatus +en : Status: [_1] +ru : Статус: [_1] +cs : Status: [_1] +hu : Állapot: [_1] +nl : + +:_relinfo_user_setstatus +en : Set status +ru*: +cs*: +hu*: +nl : Zet status :_relinfo_user_del en : remove from list diff --git a/lib/VNDB/Handler/Releases.pm b/lib/VNDB/Handler/Releases.pm index 728a68cb..6b9dbd8f 100644 --- a/lib/VNDB/Handler/Releases.pm +++ b/lib/VNDB/Handler/Releases.pm @@ -236,22 +236,18 @@ sub _infotable { } if($self->authInfo->{id}) { - my $rl = $self->dbVNListGet(uid => $self->authInfo->{id}, rid => $r->{id})->[0]; + my $rl = $self->dbRListGet(uid => $self->authInfo->{id}, rid => $r->{id})->[0]; Tr ++$i % 2 ? (class => 'odd') : (); td mt '_relinfo_user'; td; Select id => 'listsel', name => $self->authGetCode("/r$r->{id}/list"); - option mt !$rl ? '_relinfo_user_notlist' : - ('_relinfo_user_inlist', mt('_rlst_rstat_'.$rl->{rstat}), mt('_rlst_vstat_'.$rl->{vstat})); - optgroup label => mt '_relinfo_user_setr'; - option value => "r$_", mt '_rlst_rstat_'.$_ + option value => -2, + mt !$rl ? '_relinfo_user_notlist' : ('_relinfo_user_inlist', mt('_rlst_stat_'.$rl->{status})); + optgroup label => mt '_relinfo_user_setstatus'; + option value => $_, mt '_rlst_stat_'.$_ for (@{$self->{rlst_rstat}}); end; - optgroup label => mt '_relinfo_user_setv'; - option value => "v$_", mt '_rlst_vstat_'.$_ - for (@{$self->{rlst_vstat}}); - end; - option value => 'del', mt '_relinfo_user_del' if $rl; + option value => -1, mt '_relinfo_user_del' if $rl; end; end; end; diff --git a/lib/VNDB/Handler/ULists.pm b/lib/VNDB/Handler/ULists.pm index cac1acec..3bcf7b00 100644 --- a/lib/VNDB/Handler/ULists.pm +++ b/lib/VNDB/Handler/ULists.pm @@ -73,21 +73,18 @@ sub rlist { return if !$self->authCheckCode; my $f = $self->formValidate( - { name => 'e', required => 1, enum => [ 'del', map("r$_", @{$self->{rlst_rstat}}), map("v$_", @{$self->{rlst_vstat}}) ] }, + { name => 'e', required => 1, enum => [ -1, @{$self->{rlst_rstat}} ] } ); return 404 if $f->{_err}; - $self->dbVNListDel($uid, $rid) if $f->{e} eq 'del'; - $self->dbVNListAdd( - rid => $rid, - uid => $uid, - $f->{e} =~ /^([rv])(\d+)$/ && $1 eq 'r' ? (rstat => $2) : (vstat => $2) - ) if $f->{e} ne 'del'; + $self->dbRListDel($uid, $rid) if $f->{e} == -1; + $self->dbRListAdd($uid, $rid, $f->{e}) if $f->{e} >= 0; if($id) { (my $ref = $self->reqHeader('Referer')||"/r$id") =~ s/^\Q$self->{url}//; $self->resRedirect($ref, 'temp'); } else { + # TODO: FIX $self->resHeader('Content-type' => 'text/xml'); my $st = $self->dbVNListGet(uid => $self->authInfo->{id}, rid => [$rid])->[0]; xml; |