X-Git-Url: https://git.hcoop.net/hcoop/debian/courier-authlib.git/blobdiff_plain/b0322a8536f3cab76471c98122fe1df75bb7c387..d50284c4aa46bdb558ab92276d4e3ebd856fe9a6:/libs/unicode/unicodefilter.pl

diff --git a/libs/unicode/unicodefilter.pl b/libs/unicode/unicodefilter.pl
deleted file mode 100644
index a08c139..0000000
--- a/libs/unicode/unicodefilter.pl
+++ /dev/null
@@ -1,31 +0,0 @@
-
-my $unicodes=shift;
-my $testing_hook=shift;
-
-my %unicodes;
-
-grep ( $unicodes{lc($_)}=1, split (/,/, $unicodes));
-
-while (<STDIN>)
-{
-	if ($unicodes eq "" || $unicodes eq "yes")
-	{
-		print;
-		next;
-	}
-
-my ($chset, $structname)=split (/[ \t\r\n]/, $_);
-
-	if ($unicodes eq "no")
-	{
-		next if $structname ne "unicode_ISO8859_1";
-	}
-	else
-	{
-		next unless $unicodes{lc($chset)}
-			|| $structname eq "unicode_ISO8859_1";
-	}
-	print;
-}
-
-print "X-TEST\tunicode_XTEST\n" if $testing_hook eq "yes";