fix 32-bit bug in source, with a hack. oh well
This commit is contained in:
parent
d5d716486e
commit
eb77f084b5
|
@ -9,7 +9,7 @@
|
|||
sub digitize {
|
||||
my $number = shift;
|
||||
if ($number >= 256) {
|
||||
my $nn = sprintf("%x", $number);
|
||||
my $nn = `printf "%x" $number`;
|
||||
if ($nn =~ /^[01f]+$/i) { return "0x$nn"; }
|
||||
}
|
||||
return $number;
|
||||
|
|
Loading…
Reference in New Issue