git.shiar.nl
/
unifont.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
unifont-7.0.06.tar.gz
[unifont.git]
/
src
/
unifontksx
diff --git
a/src/unifontksx
b/src/unifontksx
index 40de726537cab8ca7bbfa39d9bf435800ea1198b..e31bfe5e41f28266376762043e7bc12682e9f93c 100755
(executable)
--- a/
src/unifontksx
+++ b/
src/unifontksx
@@
-386,7
+386,7
@@
$nextksx = shift(@ksx); # get first code point to find
while (<>) {
if (substr($nextksx, 0, 5) eq substr($_, 0, 5)) {
while (<>) {
if (substr($nextksx, 0, 5) eq substr($_, 0, 5)) {
- print; # this is one of the syllables we're seeking; print it
+ print
or die ("Cannot print to stdout.\n")
; # this is one of the syllables we're seeking; print it
# Now get next Hangul Syllable to find; if no more, exit.
if ($#ksx < 0) {
exit;
# Now get next Hangul Syllable to find; if no more, exit.
if ($#ksx < 0) {
exit;