Small encoding change
This commit is contained in:
parent
3c338de79f
commit
e7911d9210
1 changed files with 1 additions and 1 deletions
|
|
@ -193,7 +193,7 @@ sub _get_rss_data {
|
||||||
if ($] >= 5.008) {
|
if ($] >= 5.008) {
|
||||||
$xml =~ /<\?xml.*?encoding=['"](\S+)['"]/i;
|
$xml =~ /<\?xml.*?encoding=['"](\S+)['"]/i;
|
||||||
my $xmlEncoding = $1;
|
my $xmlEncoding = $1;
|
||||||
my $encoding = WebGUI::International::getLanguage($session{user}{language},"charset");
|
my $encoding = WebGUI::International::getLanguage($session{page}{languageId},"charset");
|
||||||
if (lc($xmlEncoding) ne lc($encoding)) {
|
if (lc($xmlEncoding) ne lc($encoding)) {
|
||||||
use Encode qw(from_to);
|
use Encode qw(from_to);
|
||||||
eval { from_to($xml, $xmlEncoding, $encoding) };
|
eval { from_to($xml, $xmlEncoding, $encoding) };
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue