diff options
author | Yorhel <git@yorhel.nl> | 2021-01-09 17:06:25 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2021-01-10 09:31:12 +0100 |
commit | 5061421becc459f86b758eef5ca45ec4d608e954 (patch) | |
tree | 7e974ceb318d9b5e904eda1ad2a3384351c96b28 /lib/VNWeb/VN/List.pm | |
parent | 5d275ce2ceb1112c1e02bbe9134b22ac478975fc (diff) |
AdvSearch: Time to put this live.2.29
Moved old release browser, VN browser and tag pages to /old/, moved
/experimental/ pages to /, removed warnings and updated some references.
Diffstat (limited to 'lib/VNWeb/VN/List.pm')
-rw-r--r-- | lib/VNWeb/VN/List.pm | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/lib/VNWeb/VN/List.pm b/lib/VNWeb/VN/List.pm index 76ca2051..ce780cef 100644 --- a/lib/VNWeb/VN/List.pm +++ b/lib/VNWeb/VN/List.pm @@ -73,7 +73,7 @@ sub enrich_userlist { } -TUWF::get qr{/experimental/v(?:/(?<char>all|[a-z0]))?}, sub { +TUWF::get qr{/v(?:/(?<char>all|[a-z0]))?}, sub { my $opt = tuwf->validate(get => q => { onerror => undef }, sq=> { onerror => undef }, @@ -146,12 +146,7 @@ TUWF::get qr{/experimental/v(?:/(?<char>all|[a-z0]))?}, sub { framework_ title => 'Browse visual novels', sub { div_ class => 'mainbox', sub { h1_ 'Browse visual novels'; - div_ class => 'warning', sub { - h2_ 'EXPERIMENTAL'; - p_ "This is Yorhel's playground. Lots of functionality is missing, lots of stuff is or will be broken. Here be dragons. Etc."; - }; - br_; - form_ action => '/experimental/v', method => 'get', sub { + form_ action => '/v', method => 'get', sub { searchbox_ v => $opt->{q}//''; p_ class => 'browseopts', sub { button_ type => 'submit', name => 'ch', value => ($_//''), ($_//'') eq ($opt->{ch}//'') ? (class => 'optselected') : (), !defined $_ ? 'ALL' : $_ ? uc $_ : '#' |