From 0a7345dfa8a6d061e13394fdbe31c77231f1847c Mon Sep 17 00:00:00 2001 From: Arne Georg Gleditsch Date: Thu, 22 Nov 2007 12:32:35 +0100 Subject: IE fixes, HTML fixes, ++ --- lib/LXRng/Lang.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'lib/LXRng/Lang.pm') diff --git a/lib/LXRng/Lang.pm b/lib/LXRng/Lang.pm index 7e6c278..754cb72 100644 --- a/lib/LXRng/Lang.pm +++ b/lib/LXRng/Lang.pm @@ -28,9 +28,10 @@ use vars qw(@languages %deftypes %defweight); qw(c f i n s t u p x v d e g m l) }; -sub import { - my ($self, @langs) = @_; +sub init { + my ($self, $context) = @_; + my @langs = @{$context->config->{'languages'} || []}; push(@langs, 'Undefined'); foreach my $l (@langs) { eval "require LXRng::Lang::$l"; -- cgit v1.2.3