X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FCloudStore%2FAPI.pm;fp=lib%2FCloudStore%2FAPI.pm;h=bb7bbc96d48443cc3f215a4a2c998f77a259e09c;hb=bebcb6dac038ad77e82ae7750c355250084deb13;hp=a62e2a4d83b2b02b0dd099a0fde51744f5553a03;hpb=1cfcaab93347b4c4dbd198fa8b555e9385636aee;p=cloudstore.git

diff --git a/lib/CloudStore/API.pm b/lib/CloudStore/API.pm
index a62e2a4..bb7bbc9 100644
--- a/lib/CloudStore/API.pm
+++ b/lib/CloudStore/API.pm
@@ -320,7 +320,9 @@ sub file_size {
 	$user = $self->user_info($user) unless ref $user eq 'HASH';
 
 	my $full_path = "$user->{dir}/$path";
-	return -s $full_path;
+	my $size = -s $full_path;
+	warn "# file_size $full_path = $size bytes\n";
+	return $size;
 }
 
 sub list_files {