From a0161a84459e67d6ec3202ebbdf2f4d464b327f2 Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Tue, 8 Sep 2026 08:30:41 +0200
Subject: [PATCH] lib/perl/NB/Functions.pm

---
 lib/perl/NB/Functions.pm | 16 +---------------
 1 file changed, 1 insertion(+), 15 deletions(-)

diff --git a/lib/perl/NB/Functions.pm b/lib/perl/NB/Functions.pm
index 0be85e0d..65d3b482 100644
--- a/lib/perl/NB/Functions.pm
+++ b/lib/perl/NB/Functions.pm
@@ -554,19 +554,6 @@ sub html2txt {
 		( \\n )
 	,\n,gix;
 
-	# Text tags
-  # NB 02.12.23 for my $tag (qw(
-  	# NB 02.12.23 div
-  	# NB 02.12.23 p
-  	# NB 02.12.23 span
-  	# NB 02.12.23 pre
-  	# NB 02.12.23 code
-  # NB 02.12.23 ))
-  # NB 02.12.23 {
-		# NB 02.12.23 my $exp = "<".$tag."[^>]*>(.*?)</$tag>";
-		# NB 02.12.23 $v =~ s,$exp,$1\n,sgi;
-  # NB 02.12.23 }
-
   # Links
 	$v =~ s,
   	<a[^>]+href="([^"]+)"[^>]*>\g1</a>
@@ -614,6 +601,7 @@ sub html2txt {
 	$v =~ s/[\f ]+/ /g;
 	&str_trim($v);
 	$v = &NB::Functions::html_unescape($v);
+	$v =~ s/\x{FEFF}/ /g; # <feff>
 
 	return $v;
 
@@ -640,8 +628,6 @@ my $str = shift @_;
 	return $str;
 }
 
-#die &html_unescape_fix_err("Karcher &ndash  Balayeuse &eacute");
-#die &html_unescape_fix_err("Pull 4 capuche Juventus FC Core pour Gar&#231on (8-15&#160ans)");
 sub html_unescape_fix_err {
 #------------------------------------------------------------------------------
 # NB 09.03.10 
-- 
2.47.3