unifont-6.3.20140202.tar.gz

[unifont.git] / src / hex2sfd

diff --git a/src/hex2sfd b/src/hex2sfd
index 0f342a68f63c8e505ac5150d68b180cfedc3c7d5..42a61d7084a6735c5eda8ef4a6aa5996aa67444f 100755 (executable)
--- a/src/hex2sfd
+++ b/src/hex2sfd
@@ -37,7 +37,12 @@
 for ($i = 0; $i < 65536; $i++) {
    push(@combining, 0);
 }
-open(A, "<combining.txt");
+if ($#ARGV < 0) {
+   open(A, "<", "combining.txt");
+}
+else {
+   open(A, "<", $ARGV[0]);
+}
 while (<A>) {
    chomp;
    $combining[ hex($_) ] = 1;