aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Phillips <david@sighup.nz>2019-09-14 11:38:36 +1200
committerDavid Phillips <david@sighup.nz>2019-09-14 11:38:36 +1200
commitea6db8e62753a011321da89439c650f70bd1d032 (patch)
treea5410b235932a7f523172e26e9b4e326afc47a67
parent2d4ea694d74a1f97274df768051b7434bba3b2a0 (diff)
downloadidalius-ea6db8e62753a011321da89439c650f70bd1d032.tar.xz
URL_Title: Allow capitalised `UTF-8` charsest
-rw-r--r--Plugin/URL_Title.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugin/URL_Title.pm b/Plugin/URL_Title.pm
index 85dc1eb..0a62782 100644
--- a/Plugin/URL_Title.pm
+++ b/Plugin/URL_Title.pm
@@ -86,7 +86,7 @@ sub get_title
$p->parse($html);
return (undef, undef, "Error parsing HTML: $!") if $!;
- if ($charset and $charset ne "utf-8") {
+ if ($charset and lc($charset) ne "utf-8") {
my $dc = Encode::find_encoding($charset);
return (undef, undef, "Error: Unknown encoding $charset") unless $dc;
$title = $dc->decode($title);