Added icons for rlist and vlist statuses and further polished the wishlist and rlist features1.20

git-svn-id: svn://vndb.org/vndb@79 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b

3 files changed, 14 insertions, 10 deletions

diff --git a/data/tpl/defs.pl b/data/tpl/defs.pl
index a7355840..e16da538 100644
--- a/data/tpl/defs.pl
+++ b/data/tpl/defs.pl
@@ -264,13 +264,13 @@ sub rlist_dd {
   return
     qq|<div class="dropdown rlistdd" id="rlistDD$$r{id}"><ul><li><b>Release status</b></li>|.
     join('', map {
-      $r->{rlist} && $_ == $r->{rlist}{rstat} ? "<li><b>&nbsp;&nbsp;$$VNDB::RSTAT[$_]</b></li>"
-        : qq|<li><a href="/r$$r{id}/list?r=$_">&nbsp;&nbsp;$$VNDB::RSTAT[$_]</a></li>|
+      $r->{rlist} && $_ == $r->{rlist}{rstat} ? qq|<li><b><acronym class="uicons r$_">&nbsp;</acronym>&nbsp;$$VNDB::RSTAT[$_]</b></li>|
+        : qq|<li><a href="/r$$r{id}/list?r=$_"><acronym class="uicons r$_">&nbsp;</acronym>&nbsp;$$VNDB::RSTAT[$_]</a></li>|
     } 0..$#$VNDB::RSTAT).
     qq|</ul><ul><li><b>Play status</b></li>|.
     join('', map {
-      $r->{rlist} && $_ == $r->{rlist}{vstat} ? "<li><b>&nbsp;&nbsp;$$VNDB::VSTAT[$_]</b></li>"
-        : qq|<li><a href="/r$$r{id}/list?v=$_">&nbsp;&nbsp;$$VNDB::VSTAT[$_]</a></li>|
+      $r->{rlist} && $_ == $r->{rlist}{vstat} ? qq|<li><b><acronym class="uicons v$_">&nbsp;</acronym>&nbsp;$$VNDB::VSTAT[$_]</b></li>|
+        : qq|<li><a href="/r$$r{id}/list?v=$_"><acronym class="uicons v$_">&nbsp;</acronym>&nbsp;$$VNDB::VSTAT[$_]</a></li>|
     } 0..$#$VNDB::VSTAT).
     qq|</ul><ul class="full">|.
     ($r->{rlist} ? qq|<li class="center"><a href="/r$$r{id}/list?d=1">remove from my list</a></li>|
diff --git a/data/tpl/rlist b/data/tpl/rlist
index e95286f3..70f0b77f 100644
--- a/data/tpl/rlist
+++ b/data/tpl/rlist
@@ -29,13 +29,13 @@
 [[ } ]]-
 <table id="rli">
  <thead><tr>
-  <td colspan="4" class="tc1">Title -[[= sortbut($sourl, 'title') ]]</td>
+  <td colspan="3" class="tc1">Title -[[= sortbut($sourl, 'title') ]]</td>
   <td class="tc2" id="relhidpar"><b id="relhidparb">&#9656;</b>Releases*</td>
   <td class="tc3">Vote -[[= sortbut($sourl, 'vote') ]]</td>
  </tr></thead>
 [[ for (@{$d{list}}) { $j=0; my $c = ' style="background-color: #'.($i++%2?'fff':'f5f5f5').'"'; ]]-
  <tr[[=$c]]>
-  <td colspan="4" class="tc1"><a href="/v[[= $_->{vid} ]]" title="[[: $_->{title} ]]">[[= shorten $_->{title}, 50 ]]</a></td>
+  <td colspan="3" class="tc1"><a href="/v[[= $_->{vid} ]]" title="[[: $_->{title} ]]">[[= shorten $_->{title}, 50 ]]</a></td>
   <td class="tc2[[= @{$_->{rels}} ? ' relhid" id="rh'.$_->{vid}.'"' : ' relnone"' ]]><b[[= @{$_->{rels}} ? ' id="rhd'.$_->{vid}.'"' : '' ]]>&#9656;</b>
    [[= grep $_->{rstat}==2, @{$_->{rels}} ]]/[[= grep $_->{vstat}==2, @{$_->{rels}} ]]/[[= @{$_->{rels}} ]]
   </td>
@@ -49,9 +49,11 @@
     title="[[= $VNDB::RTYP->[$_->{type}] ]]- release" class="icons -[[= lc substr($VNDB::RTYP->[$_->{type}],0,3) ]]">&nbsp;</acronym>
   </td>
   <td class="tc1_3"><a href="/r[[= $_->{rid} ]]" title="[[: $_->{original} ]]">[[= shorten $_->{title}, 60 ]]</a></td>
-  <td class="tc1_4">[[: $VNDB::RSTAT->[$_->{rstat}] ]]</td>
-  <td class="tc1_5">[[: $VNDB::VSTAT->[$_->{vstat}] ]]</td>
-  <td class="tc1_6">[[ if($d{user}{username} eq $p{AuthUsername}) { ]]<input type="checkbox" name="rsel" value="[[= $_->{rid} ]]" />[[ } else { ]]&nbsp;[[ } ]]</td>
+  <td class="tc1_4">
+   <acronym title="[[: $VNDB::RSTAT->[$_->{rstat}] ]]" class="uicons r[[= $_->{rstat} ]]">&nbsp;</acronym><acronym
+    title="[[: $VNDB::VSTAT->[$_->{vstat}] ]]" class="uicons v[[= $_->{vstat} ]]">&nbsp;</acronym>
+  </td>
+  <td class="tc1_5">[[ if($d{user}{username} eq $p{AuthUsername}) { ]]<input type="checkbox" name="rsel" value="[[= $_->{rid} ]]" />[[ } else { ]]&nbsp;[[ } ]]</td>
  </tr>
  [[ } ]]
 [[ } ]]-
diff --git a/data/tpl/vnpage_rel b/data/tpl/vnpage_rel
index ff981b0e..4e5d29b2 100644
--- a/data/tpl/vnpage_rel
+++ b/data/tpl/vnpage_rel
@@ -36,7 +36,9 @@
   <td class="tc4"><a href="/r[[= $_->{id} ]]" title="[[: $_->{original} || $_->{title} ]]">[[: shorten $_->{title},60 ]]</a></td>
   <td class="tc5">[[ if($p{AuthId}) { ]]
     [[= sprintf '<a href="/r%d" class="dropdown above" rel="rlistDD%1$d">%s</a>', $_->{id}, $_->{rlist} ?
-      (substr($$VNDB::RSTAT[$_->{rlist}{rstat}],0,1).'/'.substr($$VNDB::VSTAT[$_->{rlist}{vstat}],0,1)) : '---' ]]
+      ('<acronym title="'.$VNDB::RSTAT->[$_->{rlist}{rstat}].'" class="uicons r'.$_->{rlist}{rstat}.'">&nbsp;</acronym>'.
+       '<acronym title="'.$VNDB::VSTAT->[$_->{rlist}{vstat}].'" class="uicons v'.$_->{rlist}{vstat}.'">&nbsp;</acronym>')
+      : '<acronym title="Add to your visual novel list" class="uicons no">&nbsp;</acronym>' ]]
    [[ } else { ]]&nbsp;[[ } ]]</td>
   <td class="tc6">[[ if($_->{website}) { ]]<a href="[[: $_->{website} ]]" class="icons ext" title="WWW">&nbsp;</a>[[ } ]]</td>
  </tr>