From 0916ec2e23f7c15a484781894ee0edee728ecd13 Mon Sep 17 00:00:00 2001
From: Yorhel <git@yorhel.nl>
Date: Sun, 22 Dec 2019 16:51:50 +0100
Subject: ulist: Update "My lists" VN filters to use new ulists feature

This is just a simple backwards-compatible port, proper integration
should allow one to filter on individual labels. The "On my VN list"
filter now works slightly differently in that it considers *everything*
in ulist_vns to be on the users' VN list, including votes and wishlist.

I've removed the option to display a "Wishlist" column. The wishlist
works rather differently now, maybe this should instead just display all
assigned labels - but that would consume quite a bit of space. :(
---
 lib/VNDB/Handler/VNBrowse.pm | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

(limited to 'lib/VNDB/Handler/VNBrowse.pm')

diff --git a/lib/VNDB/Handler/VNBrowse.pm b/lib/VNDB/Handler/VNBrowse.pm
index b3ec9dc6..64cc57d4 100644
--- a/lib/VNDB/Handler/VNBrowse.pm
+++ b/lib/VNDB/Handler/VNBrowse.pm
@@ -26,7 +26,6 @@ sub list {
     { get => 'rfil', required => 0, default => '' },
     { get => 'cfil', required => 0, default => '' },
     { get => 'vnlist', required => 0, default => 2, enum => [ '0', '1' ] }, # 2: use pref
-    { get => 'wish',   required => 0, default => 2, enum => [ '0', '1' ] }, # 2: use pref
   );
   return $self->resNotFound if $f->{_err};
   $f->{q} ||= $f->{sq};
@@ -45,7 +44,6 @@ sub list {
   };
 
   $f->{vnlist} = $read_write_pref->('vnlist', 'vn_list_own');
-  $f->{wish}   = $read_write_pref->('wish',   'vn_list_wish');
 
   return $self->resRedirect('/'.$1.$2.(!$3 ? '' : $1 eq 'd' ? '#'.$3 : '.'.$3), 'temp')
     if $f->{q} && $f->{q} =~ /^([gvrptudcis])([0-9]+)(?:\.([0-9]+))?$/;
@@ -64,9 +62,7 @@ sub list {
     %compat,
     tagspoil => $self->authPref('spoilers')||0,
   }, {
-    what =>               ' rating' .
-         ($f->{vnlist}  ? ' vnlist'   : '').
-         ($f->{wish}    ? ' wishlist' : ''),
+    what => ' rating'.($f->{vnlist} ? ' vnlist' : ''),
     $char ne 'all' ? ( char    => $char   ) : (),
     $f->{q}        ? ( search  => $f->{q} ) : (),
     keys %$rfil    ? ( release => $rfil   ) : (),
@@ -103,7 +99,6 @@ sub list {
    if($uid) {
      p class => 'browseopts';
       a href => $url->($char, 'vnlist'), $f->{vnlist} ? (class => 'optselected') : (), 'User VN list';
-      a href => $url->($char, 'wish'  ), $f->{wish}   ? (class => 'optselected') : (), 'Wishlist';
      end 'p';
    }
 
-- 
cgit v1.2.3