diff options
author | Yorhel <git@yorhel.nl> | 2016-01-16 11:52:22 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2016-01-16 15:11:36 +0100 |
commit | 6313653b01652affded23d682d136e5e6ee42799 (patch) | |
tree | 528263a90a2c336c3ab6226c211a1abeccffacb3 /lib/VNDB/Handler/Misc.pm | |
parent | ca1a9c48c24a436babd30ad9e315db2781364879 (diff) |
L10N: Intern languages/platforms/resolutions/media/ptype/rtype/vnlength
Diffstat (limited to 'lib/VNDB/Handler/Misc.pm')
-rw-r--r-- | lib/VNDB/Handler/Misc.pm | 29 |
1 files changed, 4 insertions, 25 deletions
diff --git a/lib/VNDB/Handler/Misc.pm b/lib/VNDB/Handler/Misc.pm index cb9a508a..e36c0254 100644 --- a/lib/VNDB/Handler/Misc.pm +++ b/lib/VNDB/Handler/Misc.pm @@ -13,7 +13,6 @@ TUWF::register( qr{}, \&homepage, qr{(?:([upvrcs])([1-9]\d*)/)?hist},\&history, qr{d([1-9]\d*)}, \&docpage, - qr{setlang}, \&setlang, qr{nospam}, \&nospam, qr{xml/prefs\.xml}, \&prefs, qr{opensearch\.xml}, \&opensearch, @@ -150,8 +149,8 @@ sub homepage { li; lit $self->{l10n}->datestr($_->{released}); txt ' '; - cssicon $_, mt "_plat_$_" for (@{$_->{platforms}}); - cssicon "lang $_", mt "_lang_$_" for (@{$_->{languages}}); + cssicon $_, $self->{platforms}{$_} for (@{$_->{platforms}}); + cssicon "lang $_", $self->{languages}{$_} for (@{$_->{languages}}); txt ' '; a href => "/r$_->{id}", title => $_->{original}||$_->{title}, shorten $_->{title}, 30; end; @@ -170,8 +169,8 @@ sub homepage { li; lit $self->{l10n}->datestr($_->{released}); txt ' '; - cssicon $_, mt "_plat_$_" for (@{$_->{platforms}}); - cssicon "lang $_", mt "_lang_$_" for (@{$_->{languages}}); + cssicon $_, $self->{platforms}{$_} for (@{$_->{platforms}}); + cssicon "lang $_", $self->{languages} for (@{$_->{languages}}); txt ' '; a href => "/r$_->{id}", title => $_->{original}||$_->{title}, shorten $_->{title}, 30; end; @@ -346,26 +345,6 @@ sub docpage { } -sub setlang { - my $self = shift; - - my $frm = $self->formValidate( - {get => 'lang', required => 1, enum => [ VNDB::L10N::languages ]}, - {get => 'ref', required => 0, default => '/'} - ); - return $self->resNotFound if $frm->{_err}; - - my $browser = VNDB::L10N->get_handle()->language_tag(); - - $self->resRedirect($frm->{ref}, 'post'); - if($frm->{lang} ne $self->{l10n}->language_tag()) { - $self->authInfo->{id} - ? $self->authPref(l10n => $frm->{lang} eq $browser ? undef : $frm->{lang}) - : $self->resCookie(l10n => $frm->{lang} eq $browser ? undef : $frm->{lang}, expires => time()+31536000); - } -} - - sub nospam { my $self = shift; $self->htmlHeader(title => mt '_nospam_title', noindex => 1); |