X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtout.pm;h=68405f8f4236e4521cf6e320fe0be1bbafc285b4;hb=07f2e6cff3523ababee9c42008568cb469befe9d;hp=dc4257a8689c2cb6e329edfa56e878a742af700f;hpb=05a7fdd4a58c51e21b55b0509b054b625839290c;p=spider.git diff --git a/perl/DXProtout.pm b/perl/DXProtout.pm index dc4257a8..68405f8f 100644 --- a/perl/DXProtout.pm +++ b/perl/DXProtout.pm @@ -372,7 +372,7 @@ sub hexstamp $hexlastlet = chr(ord($hexlastlet) + 1); } while ($hexlastlet eq '^'); } - return sprintf "%c%08X", $hexlastlet, $hexlasttime; + return sprintf "%s%08X", $hexlastlet, $hexlasttime; } sub pc58