diff options
author | Yorhel <git@yorhel.nl> | 2021-01-16 09:39:54 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2021-01-16 09:39:56 +0100 |
commit | b82e89d248861bdd5dd4dfd2a793ee94d4a29185 (patch) | |
tree | 3953db67f5f083a78aa805b80c9c90c76203bdc6 /lib/VNDB/Handler/Chars.pm | |
parent | 2a0e9edae898865a44a65135049d74ecf7ee1154 (diff) |
Chars::List: Switch to new AdvSearch system
TODO: Add VN subquery and migrate trait pages.
Diffstat (limited to 'lib/VNDB/Handler/Chars.pm')
-rw-r--r-- | lib/VNDB/Handler/Chars.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/VNDB/Handler/Chars.pm b/lib/VNDB/Handler/Chars.pm index 353ee37f..f75e1b46 100644 --- a/lib/VNDB/Handler/Chars.pm +++ b/lib/VNDB/Handler/Chars.pm @@ -11,7 +11,7 @@ use VNDB::Types; our @EXPORT = ('charBrowseTable'); TUWF::register( - qr{c/([a-z0]|all)} => \&list, + qr{old/c/([a-z0]|all)} => \&list, ); @@ -38,13 +38,13 @@ sub list { $self->htmlHeader(title => 'Browse characters'); my $quri = uri_escape($f->{q}); - form action => '/c/all', 'accept-charset' => 'UTF-8', method => 'get'; + form action => '/old/c/all', 'accept-charset' => 'UTF-8', method => 'get'; div class => 'mainbox'; h1 'Browse characters'; $self->htmlSearchBox('c', $f->{q}); p class => 'browseopts'; for ('all', 'a'..'z', 0) { - a href => "/c/$_?q=$quri;fil=$f->{fil}", $_ eq $fch ? (class => 'optselected') : (), $_ eq 'all' ? 'ALL' : $_ ? uc $_ : '#'; + a href => "/old/c/$_?q=$quri;fil=$f->{fil}", $_ eq $fch ? (class => 'optselected') : (), $_ eq 'all' ? 'ALL' : $_ ? uc $_ : '#'; } end; @@ -64,7 +64,7 @@ sub list { end; } - @$list && $self->charBrowseTable($list, $np, $f, "/c/$fch?q=$quri;fil=$f->{fil}"); + @$list && $self->charBrowseTable($list, $np, $f, "/old/c/$fch?q=$quri;fil=$f->{fil}"); $self->htmlFooter; } |