diff options
Diffstat (limited to 'lib/VNWeb/Releases')
| -rw-r--r-- | lib/VNWeb/Releases/List.pm | 9 | ||||
| -rw-r--r-- | lib/VNWeb/Releases/Page.pm | 3 |
2 files changed, 3 insertions, 9 deletions
diff --git a/lib/VNWeb/Releases/List.pm b/lib/VNWeb/Releases/List.pm index c9ac1eff..4f3664ca 100644 --- a/lib/VNWeb/Releases/List.pm +++ b/lib/VNWeb/Releases/List.pm @@ -30,7 +30,7 @@ sub listing_ { } -TUWF::get qr{/experimental/r}, sub { +TUWF::get qr{/r}, sub { my $opt = tuwf->validate(get => q => { onerror => undef }, p => { upage => 1 }, @@ -84,12 +84,7 @@ TUWF::get qr{/experimental/r}, sub { framework_ title => 'Browse releases', sub { div_ class => 'mainbox', sub { h1_ 'Browse releases'; - 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/r', method => 'get', sub { + form_ action => '/r', method => 'get', sub { searchbox_ r => $opt->{q}//''; input_ type => 'hidden', name => 'o', value => $opt->{o}; input_ type => 'hidden', name => 's', value => $opt->{s}; diff --git a/lib/VNWeb/Releases/Page.pm b/lib/VNWeb/Releases/Page.pm index bc885c33..8067de7c 100644 --- a/lib/VNWeb/Releases/Page.pm +++ b/lib/VNWeb/Releases/Page.pm @@ -143,8 +143,7 @@ sub _infotable_ { tr_ sub { td_ 'Engine'; td_ sub { - # TODO: Should not rely on legacy VNDB::* functions! - a_ href => '/r?fil='.VNDB::Util::Misc::fil_serialize({engine => $r->{engine}}), $r->{engine}; + a_ href => '/r?f='.tuwf->compile({advsearch => 'r'})->validate(['engine', '=', $r->{engine}])->data->query_encode, $r->{engine}; } } if length $r->{engine}; |