From 575f9268560186ceb24b47179778885a2a285d01 Mon Sep 17 00:00:00 2001
From: Nicolas Dandrimont <Nicolas.Dandrimont@crans.org>
Date: Mon, 30 Aug 2010 16:06:42 +0200
Subject: [PATCH] [tv] Les chaines anglaises ont plein de chars invalides...

darcs-hash:20100830140642-ffbb2-a61aca1ec6572f63cac833c4c25201e03d06f53a.gz
---
 tv/gen_dns.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tv/gen_dns.pl b/tv/gen_dns.pl
index 98a6472d..aa5b6432 100755
--- a/tv/gen_dns.pl
+++ b/tv/gen_dns.pl
@@ -69,7 +69,7 @@ while (<CHAINES>) {
     if (/(.*):(.*)$/) {
 	my $name = "$1";
 	my $ip = "$2";
-	$name =~ s/[ .():,"]//g;
+	$name =~ s/[ .():,"+<>]//g;
 	$name = lc($name);
 	print DIRECT "$name IN A $ip\n";
 	if ($ip =~ /^\d+\.(\d+)\.(\d+)\.(\d+)$/) {