use Data::Dump qw(dump);
use lib '/srv/cloudstore/lib';
-use CloudStore::Couchbase;
+use CloudStore::Store;
-my $store = CloudStore::Couchbase->new;
+my $store = CloudStore::Store->new;
my $login = $ENV{RSYNC_MODULE_NAME} || die "no RSYNC_MODULE_NAME";
+exit 0; # FIXME
+
my $user = $store->user_get($login);
my $ok = $user->{usage} <= $user->{quota};