X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDispatcher.pm;h=e6a9d5220dfe764fc607317c91953d861a5294d5;hb=f7744663f85e38b13ab593a65c94dea685ae4208;hp=f65ec1ab4c6fe4fec8e2de38130a1e812b23f1b7;hpb=26071d70629960f3b82536c654e3374738404dbe;p=deb%2Fpackages.git diff --git a/lib/Packages/Dispatcher.pm b/lib/Packages/Dispatcher.pm index f65ec1a..e6a9d52 100755 --- a/lib/Packages/Dispatcher.pm +++ b/lib/Packages/Dispatcher.pm @@ -91,7 +91,6 @@ sub do_dispatch { my $homedir = dirname($ENV{SCRIPT_FILENAME}).'/../'; &Packages::Config::init( $homedir ); &Packages::DB::init(); - &Packages::I18N::Locale::load( "$homedir/po" ); my $acc = I18N::AcceptLanguage->new(); my %all_langs = map { $_ => 1 } (@LANGUAGES, @DDTP_LANGUAGES); @@ -274,9 +273,8 @@ sub do_dispatch { Packages::CGI::init_url( $input, \%params, \%opts ); my $charset = "UTF-8"; - my $cat = Packages::I18N::Locale->get_handle( $opts{lang} ) - || Packages::I18N::Locale->get_handle( 'en' ); - die "get_handle failed for $opts{lang}" unless $cat; + my $cat = Packages::I18N::Locale->get_handle( $opts{lang}, "en" ) + or die "get_handle failed for $opts{lang}"; $opts{cat} = $cat; $opts{h_suites} = { map { $_ => 1 } @suites };