MV_HTTP_CHARSET —
Interchange 5.7.0:
Source: lib/Vend/CharSet.pm (rev. 2.10 from Sat Sep 27 00:01:21 2008)
Line 69 (context shows lines 59-73 in default_charset():67)
return $string;
}
sub validate_encoding {
my ($class, $encoding) = @_;
return resolve_alias($encoding);
}
sub default_charset {
my $c = $Global::Selector{$CGI::script_name};
return $c->{Variable}{MV_HTTP_CHARSET} || $Global::Variable->{MV_HTTP_CHARSET};
}
# This is a workaround for the problem with UTF-8 regular expressions
# implicitly trying to require UTF-8