diff options
author | David Phillips <david@sighup.nz> | 2019-09-14 11:38:36 +1200 |
---|---|---|
committer | David Phillips <david@sighup.nz> | 2019-09-14 11:38:36 +1200 |
commit | ea6db8e62753a011321da89439c650f70bd1d032 (patch) | |
tree | a5410b235932a7f523172e26e9b4e326afc47a67 | |
parent | 2d4ea694d74a1f97274df768051b7434bba3b2a0 (diff) | |
download | idalius-ea6db8e62753a011321da89439c650f70bd1d032.tar.xz |
URL_Title: Allow capitalised `UTF-8` charsest
-rw-r--r-- | Plugin/URL_Title.pm | 2 |
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); |