diff options
| author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2007-11-22 12:32:35 +0100 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2007-11-22 12:32:35 +0100 |
| commit | 0a7345dfa8a6d061e13394fdbe31c77231f1847c (patch) | |
| tree | 1cb7d9ee680268aea821fc8ca4a1c318b3289f9c /lib/LXRng/Lang.pm | |
| parent | 8c978d76179b4f573c1eb9b9bb9db966c81330bb (diff) | |
IE fixes, HTML fixes, ++
Diffstat (limited to 'lib/LXRng/Lang.pm')
| -rw-r--r-- | lib/LXRng/Lang.pm | 5 |
1 files changed, 3 insertions, 2 deletions
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"; |