X-Git-Url: https://git.gag.com/?p=debian%2Famanda;a=blobdiff_plain;f=perl%2FAmanda%2FLogfile.swg;h=9d1a1de48cc253aba84d610c7b97fb095b4b0822;hp=69b0846ab720a3b3acf41822412b4cac2ab01f22;hb=cd0b924f27312d57bd42f6c4fae2b795139e2d0b;hpb=011a59f5a54864108a16af570a6b287410597cc2 diff --git a/perl/Amanda/Logfile.swg b/perl/Amanda/Logfile.swg index 69b0846..9d1a1de 100644 --- a/perl/Amanda/Logfile.swg +++ b/perl/Amanda/Logfile.swg @@ -153,6 +153,7 @@ typedef struct { int partnum; int totalparts; double sec; + off_t bytes; off_t kb; off_t orig_kb; %mutable; @@ -365,9 +366,9 @@ sub make_stats { my $kps = "$kb.0"/$duration; # Perlish cast from BigInt to float if (defined $orig_kb) { - return sprintf("[sec %f kb %d kps %f orig-kb %d]", $duration, $kb, $kps, $orig_kb); + return sprintf("[sec %f bytes %s kps %f orig-kb %s]", $duration, $size, $kps, $orig_kb); } else { - return sprintf("[sec %f kb %d kps %f]", $duration, $kb, $kps); + return sprintf("[sec %f bytes %s kps %f]", $duration, $size, $kps); } }