make .meta path for rsync secrets file
authorDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 12 Dec 2011 19:50:57 +0000 (20:50 +0100)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 12 Dec 2011 19:51:00 +0000 (20:51 +0100)
This way it ends up owned by root which is a good thing.

lib/CloudStore/API.pm

index 93d3c76..689c8ba 100644 (file)
@@ -68,7 +68,9 @@ sub create_user {
                mkdir $dir;
                chown $max_uid, $self->{PORT}, $dir;
 
-               open($fh, '>', "$dir/.meta/secrets");
+               my $path = "$dir/.meta/secrets";
+               $self->mkbasepath($path);
+               open($fh, '>', $path);
                print $fh "u$max_uid:$new_passwd\n";
                close $fh;
        }