create_index_pages: Fix charset

charset was set by get_locale, which is obviously
bogus.

Reported by Tommi Vainikainen <thv -at- iki fi>

diff --git a/bin/create_index_pages b/bin/create_index_pages
index 8586671bdbbffb52616d7d331ab4d6255ebb02f1..72498e9299669f6a931171b84f441433340773d4 100755 (executable)
--- a/bin/create_index_pages
+++ b/bin/create_index_pages
@@ -67,7 +67,7 @@ foreach my $s (@SUITES) {
     mkpath ( "$wwwdir/source/$key" );
     foreach my $lang (@LANGUAGES) {
        my $locale = get_locale( $lang );
     mkpath ( "$wwwdir/source/$key" );
     foreach my $lang (@LANGUAGES) {
        my $locale = get_locale( $lang );

-       my $charset = get_locale( $lang );
+       my $charset = get_charset( $lang );

        setlocale ( LC_ALL, $locale ) or do {
            warn "couldn't set locale ($lang/$locale)\n";
            next;
        setlocale ( LC_ALL, $locale ) or do {
            warn "couldn't set locale ($lang/$locale)\n";
            next;