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
/
unipng2hex
diff --git
a/src/unipng2hex
b/src/unipng2hex
index 3da8f6083a4067d28314c3318ffd0a189ae44fe5..4519b64cb6936dea1a377c5a8ce428ffc3517878 100755
(executable)
--- a/
src/unipng2hex
+++ b/
src/unipng2hex
@@
-37,7
+37,7
@@
$result = GetOptions (
);
if ($opt_help) {
);
if ($opt_help) {
- print << "END";
+ print << "END"
or die ("Cannot print to stdout.\n")
;
Turn a .png glyph matrix into a GNU Unifont hex glyph set of 256 characters
Turn a .png glyph matrix into a GNU Unifont hex glyph set of 256 characters
@@
-70,7
+70,7
@@
if (not $input) {
#}
GD::Image->trueColor (1);
#}
GD::Image->trueColor (1);
-$im = new GD::Image ("$input") or die ("Cannot open image\n");
+$im = new GD::Image ("$input") or die ("Cannot open image
.
\n");
if ($im->isTrueColor ()) {
$im->trueColorToPalette ();
if ($im->isTrueColor ()) {
$im->trueColorToPalette ();
@@
-185,7
+185,7
@@
$codepoint = ($codepoint << 4);
$display_width = $codepoint > 0xFFFF ? 6 : 4;
if ($output) {
$display_width = $codepoint > 0xFFFF ? 6 : 4;
if ($output) {
- open (HEXFILE, ">$output") or die ("Cannot save
file
\n");
+ open (HEXFILE, ">$output") or die ("Cannot save
hex file.
\n");
} else {
*HEXFILE = *STDOUT;
}
} else {
*HEXFILE = *STDOUT;
}
@@
-226,7
+226,7
@@
for ($col = 0; $col < 16; $col++) {
$char = $char . sprintf ("%0*X", $charwidth * 2, $line);
}
$char = $char . sprintf ("%0*X", $charwidth * 2, $line);
}
- print HEXFILE "$char\n";
+ print HEXFILE "$char\n"
or die ("Cannot print to hex file.\n")
;
}
$codepoint += 1;
}
$codepoint += 1;
@@
-235,5
+235,5
@@
for ($col = 0; $col < 16; $col++) {
# Only close HEXFILE if it isn't mapped to STDOUT.
if ($output) {
# Only close HEXFILE if it isn't mapped to STDOUT.
if ($output) {
- close HEXFILE;
+ close HEXFILE
or die ("Cannot properly close hex file.\n")
;
}
}