From b011031f81fb357f728968d54ca3486b32790691 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 25 Apr 2011 11:00:28 +0200 Subject: hashl list: Make size field longer (may be 1023.0k and such) --- bin/hashl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bin/hashl b/bin/hashl index 4c0ebd4..5dad044 100755 --- a/bin/hashl +++ b/bin/hashl @@ -81,7 +81,7 @@ sub si_size { $bytes /= 1024; shift @post; } - return sprintf("%5.1f%s", $bytes, $post[0]); + return sprintf("%6.1f%s", $bytes, $post[0]); } sub drop_deleted { @@ -364,7 +364,7 @@ sub cmd_list { for my $name (sort keys %{$db->{'files'}}) { my $file = $db->{'files'}->{$name}; printf( - "%s %-6s %s\n", + "%s %-7s %s\n", $file->{'hash'}, si_size($file->{'size'}), $name -- cgit v1.2.3