xref: /OK3568_Linux_fs/buildroot/package/netsurf/0001-avoid-system-perl-dependencies.patch (revision 4882a59341e53eb6f0b4789bf948001014eff981)
1From b42e4b5bfca030965dcfca993a47a6ddaa941287 Mon Sep 17 00:00:00 2001
2From: Francois Perrad <francois.perrad@gadz.org>
3Date: Sun, 25 Nov 2018 18:27:54 +0100
4Subject: [PATCH] avoid system perl dependencies
5
6this subroutine format is used for android target.
7with eval the load of HTML::Entities is deferred.
8
9Signed-off-by: Francois Perrad <francois.perrad@gadz.org>
10---
11 netsurf/utils/split-messages.pl | 2 +-
12 1 file changed, 1 insertion(+), 1 deletion(-)
13
14diff --git a/netsurf/utils/split-messages.pl b/netsurf/utils/split-messages.pl
15index 4b50dde..e47dded 100644
16--- a/netsurf/utils/split-messages.pl
17+++ b/netsurf/utils/split-messages.pl
18@@ -311,7 +311,7 @@ TXT
19     sub footer { qq|</resources>| }
20     sub format
21     {
22-	use HTML::Entities qw(encode_entities);
23+	eval q|use HTML::Entities qw(encode_entities);|;
24 	my $escaped = encode_entities( $_[1], '<>&"' );
25 	qq|  <string name="$_[0]">$escaped</string>\n|;
26     }
27--
282.17.1
29
30