From: Dobrica Pavlinusic Date: Mon, 12 Dec 2011 19:50:17 +0000 (+0100) Subject: create md5pool on empty slice X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=bd428a6bb4efcaa76d853eddcb807d13c245aca4;p=cloudstore.git create md5pool on empty slice --- diff --git a/lib/CloudStore/API.pm b/lib/CloudStore/API.pm index 9ac973a..93d3c76 100644 --- a/lib/CloudStore/API.pm +++ b/lib/CloudStore/API.pm @@ -22,7 +22,12 @@ sub new { }; bless $self, $class; - $self->{md5} = $self->user_info('md5'); + $self->{md5} = $self->user_info("md5") || die "can't find user md5"; + $self->{md5}->{dir} = "$dir/md5"; + if ( ! -e $self->{md5}->{dir} ) { + make_path $self->{md5}->{dir}, { uid => $self->{md5}->{uid}, gid => $self->{md5}->{gid} }; + warn "## CREATED md5pool $self->{md5}->{dir}\n"; + } return $self; }