From: Robert Spalek <robert@ucw.cz>
Date: Fri, 4 Jul 2003 12:48:39 +0000 (+0000)
Subject: adapted to UNDEFINED characters
X-Git-Tag: holmes-import~1226
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=03641c6feaa547390186e32fd3318df40b592ce6;p=libucw.git

adapted to UNDEFINED characters
---

diff --git a/charset/misc/trunicode b/charset/misc/trunicode
index 73f5d371..6e50073d 100755
--- a/charset/misc/trunicode
+++ b/charset/misc/trunicode
@@ -15,8 +15,10 @@ foreach $file (@ARGV)
 	{
 		next if /^#/;
 		chop;
-		($code, $unicode, $comment) = /^0x(..)\t0x(....)\t#\t(.*)$/;
-		print fo "$code\t$unicode\t$comment\n";
+		if (($code, $unicode, $comment) = /^0x(..)\t0x(....)\t#\t?(.*)$/)
+		{
+			print fo "$code\t$unicode\t$comment\n";
+		}
 	}
 	close(fo);
 	close(fi);