summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--data/lang.txt31
-rw-r--r--lib/VNDB/Handler/Releases.pm16
-rw-r--r--lib/VNDB/Handler/ULists.pm11
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;