diff options
Diffstat (limited to 'move/move.pm')
-rw-r--r-- | move/move.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/move/move.pm b/move/move.pm index b29a63ec3..d10e46822 100644 --- a/move/move.pm +++ b/move/move.pm @@ -8,7 +8,9 @@ use common; use fs; use run_program; use log; +use lang; +my @ALLOWED_LANGS = qw(en_US fr es it de); #- run very soon at stage2 start, setup things on tmpfs rw / that #- were not necessary to start stage2 itself (there were setup @@ -41,6 +43,8 @@ sub init { run_program::run('/sbin/devfsd', '/dev'); modules::load_category('multimedia/sound'); + + member($_, @ALLOWED_LANGS) or delete $lang::langs{$_} foreach keys %lang::langs; } |