diff options
| author | trizen <trizen@protonmail.com> | 2020-08-02 14:11:22 +0300 |
|---|---|---|
| committer | Jesús <heckyel@hyperbola.info> | 2020-08-07 12:44:45 -0500 |
| commit | 09356996f82a8cd55cac1f02daf89e3f9deb8433 (patch) | |
| tree | 22b084e3e9c846e8d9ed6f1324111fceccb62731 /lib/WWW/FairViewer/Utils.pm | |
| parent | 909b930f85f449568dd57f1da0e6db318bd7b3e5 (diff) | |
| download | fair-viewer-09356996f82a8cd55cac1f02daf89e3f9deb8433.tar.lz fair-viewer-09356996f82a8cd55cac1f02daf89e3f9deb8433.tar.xz fair-viewer-09356996f82a8cd55cac1f02daf89e3f9deb8433.zip | |
Minor fix in the decoding of URLs in video description.
Signed-off-by: Jesús <heckyel@hyperbola.info>
Diffstat (limited to 'lib/WWW/FairViewer/Utils.pm')
| -rw-r--r-- | lib/WWW/FairViewer/Utils.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/WWW/FairViewer/Utils.pm b/lib/WWW/FairViewer/Utils.pm index 852d870..5521a2e 100644 --- a/lib/WWW/FairViewer/Utils.pm +++ b/lib/WWW/FairViewer/Utils.pm @@ -474,6 +474,11 @@ sub get_description { } }segi; + # Decode hashtags + $desc =~ s{<a href="/results\?search_query=.*?".*?>(.*?)</a>}{ + $1 + }segi; + # Decode internal links to videos / playlists $desc =~ s{<a href="/(watch\?.*?)".*?>(https://www\.youtube\.com)/watch\?.*?</a>}{ my $url = $2; @@ -482,7 +487,7 @@ sub get_description { }segi; $desc =~ s{<br/?>}{\n}gi; - $desc =~ s{<a href=".*?".*?>(.*?)</a>}{$1}sgi; + $desc =~ s{<a href="(.*?)".*?>.*?</a>}{$1}sgi; $desc =~ s/<.*?>//gs; $desc = HTML::Entities::decode_entities($desc); |