diff options
Diffstat (limited to 'lib/VNWeb/Reviews/Page.pm')
| -rw-r--r-- | lib/VNWeb/Reviews/Page.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/VNWeb/Reviews/Page.pm b/lib/VNWeb/Reviews/Page.pm index cab028e4..36ed8ee2 100644 --- a/lib/VNWeb/Reviews/Page.pm +++ b/lib/VNWeb/Reviews/Page.pm @@ -2,7 +2,6 @@ package VNWeb::Reviews::Page; use VNWeb::Prelude; use VNWeb::Releases::Lib; -use VNWeb::Reviews::Lib; my $COMMENT = form_compile any => { @@ -65,7 +64,9 @@ sub review_ { }; tr_ sub { td_ ''; - td_ style => 'text-align: right', sub { review_vote_ $w }; + td_ style => 'text-align: right', sub { + elm_ 'Reviews.Vote' => $VNWeb::Reviews::Elm::VOTE_OUT, $w if auth && $w->{can}; + }; }; } } @@ -74,7 +75,7 @@ sub review_ { TUWF::get qr{/$RE{wid}(?:(?<sep>[\./])$RE{num})?}, sub { my($id, $sep, $num) = (tuwf->capture('id'), tuwf->capture('sep')||'', tuwf->capture('num')); my $w = tuwf->dbRowi( - 'SELECT r.id, r.vid, r.rid, r.isfull, r.text, r.spoiler, COALESCE(c.count,0) AS count, r.c_up, r.c_down, uv.vote, rm.id IS NULL AS can + 'SELECT r.id, r.vid, r.rid, r.isfull, r.text, r.spoiler, COALESCE(c.count,0) AS count, uv.vote, rm.id IS NULL AS can , v.title, rel.title AS rtitle, rel.original AS roriginal, rel.type AS rtype, rv.vote AS my , ', sql_user(), ',', sql_totime('r.date'), 'AS date,', sql_totime('r.lastmod'), 'AS lastmod FROM reviews r |