From ce44133acf3fd64c6d2e07aec3cf121b5e6cb8e7 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 15 Apr 2012 23:21:22 +0200 Subject: [PATCH] edge case in which there is files cache but not usage --- lib/CloudStore/API.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/CloudStore/API.pm b/lib/CloudStore/API.pm index d68cd1e..03a781c 100644 --- a/lib/CloudStore/API.pm +++ b/lib/CloudStore/API.pm @@ -334,7 +334,7 @@ sub list_files { my $files = $user->{dir} . '/.meta/files'; $self->mkbasepath( $files, { uid => $user->{uid} } ); - if ( -e $files && -s $files > 0) { + if ( -e $files && -s $files > 0 && -e "$files.usage") { local $/ = undef; open(my $fh, '<', $files); my $list = <$fh>; -- 2.20.1