git.schokokeks.org
Repositories
Help
Report an Issue
tor-webwml.git
Code
Commits
Branches
Tags
Suche
Strukturansicht:
49f00fb07
Branches
Tags
bridges
docs-debian
jobs
master
press-clips
tor-webwml.git
include
perl-globals.wmi
Add sanity check for defined languages
Peter Palfrader
commited
49f00fb07
at 2005-12-21 01:43:11
perl-globals.wmi
Blame
History
Raw
#!wml <: # Change both. The array is ordered (for pages like translation status). # The order of flasg in head is based on sort order of language name. my @LANGUAGES = qw{en de it fr}; my %LANGUAGES = ( 'en' => "English", 'de' => "Deutsch", 'it' => "Italiano", 'fr' => "Français", ); our $WML_SRC_FILENAME; # sanity check. for my $lang (@LANGUAGES) { die "Language $lang defined in \@LANGUAGES but not in \%LANGUAGES in perl-globals" unless exists $LANGUAGES{$lang}; }; die "\@LANGUAGES and \%LANGUAGES have a different number of elements in perl-globals" unless (scalar @LANGUAGES == scalar keys %LANGUAGES); :>