my $xmlEncoding = $1 || 'utf8';
This commit is contained in:
parent
5cf79c8a97
commit
23aae5f0b8
2 changed files with 2 additions and 1 deletions
|
|
@ -5,6 +5,7 @@
|
|||
- Corrected an error in the built in WebGUI config file documentation.
|
||||
- Fixed Survey copy bug that prevented asset from appearing in clipboard.
|
||||
- Fixed Survey copy bug that was preventing section data from being copied.
|
||||
- Workedaround a bug for broken xml docs in Syndicated Content. (mwilson)
|
||||
|
||||
6.7.4
|
||||
- fix [ 1279861 ] POD errors in 6.7.3
|
||||
|
|
|
|||
|
|
@ -253,7 +253,7 @@ sub _get_rss_data {
|
|||
# Convert encoding if needed / Perl 5.8.0 or up required.
|
||||
if ($] >= 5.008 && $hasEncode) {
|
||||
$xml =~ /<\?xml.*?encoding=['"](\S+)['"]/i;
|
||||
my $xmlEncoding = $1;
|
||||
my $xmlEncoding = $1 || 'utf8';
|
||||
my $encoding = 'utf8';
|
||||
if (lc($xmlEncoding) ne lc($encoding)) {
|
||||
eval { from_to($xml, $xmlEncoding, $encoding) };
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue