From a8ef1246023693f951518c3da08adfbbe2e3f6d6 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?David=20Pr=C3=A9vot?= Date: Sat, 4 Jun 2011 16:09:23 +0000 Subject: quirty UTF-8 fix (lots of lines needs to be dropped, Madamezou, Perl clean up punishment?) CVS version numbers copypage.pl: 1.39 -> 1.40 --- copypage.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'copypage.pl') diff --git a/copypage.pl b/copypage.pl index 1c28e7f8400..3335ee18911 100755 --- a/copypage.pl +++ b/copypage.pl @@ -152,7 +152,7 @@ if (open WMLRC, "$language/.wmlrc") { if (s/^-D CHARSET=//) { - $recode = 1 unless /^iso-8859-1$/i; + $recode = 1 unless /^utf-8$/i; if ($recode && /^iso-8859-([0-9]+)$/) { my $compattablename = 'iso_8859_' . $1 . '_compat'; -- cgit v1.2.3