summaryrefslogtreecommitdiff
path: root/lib/VNWeb/Releases
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2021-01-09 17:06:25 +0100
committerYorhel <git@yorhel.nl>2021-01-10 09:31:12 +0100
commit5061421becc459f86b758eef5ca45ec4d608e954 (patch)
tree7e974ceb318d9b5e904eda1ad2a3384351c96b28 /lib/VNWeb/Releases
parent5d275ce2ceb1112c1e02bbe9134b22ac478975fc (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/Releases')
-rw-r--r--lib/VNWeb/Releases/List.pm9
-rw-r--r--lib/VNWeb/Releases/Page.pm3
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};