json_path -> path
authorDobrica Pavlinusic <dpavlin@rot13.org>
Tue, 19 Jul 2011 17:02:56 +0000 (17:02 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Tue, 19 Jul 2011 17:02:56 +0000 (17:02 +0000)
lib/CloudStore/JSON.pm

index 5a3c1ff..8e54894 100644 (file)
@@ -35,28 +35,28 @@ sub rsync_transfer {
        my ( $data ) = @_;
        my $json = encode_json $data;
 
-       my $json_path = "users/$data->{login}/json/$data->{file}";
+       my $path = "users/$data->{login}/json/$data->{file}";
 
        if ( $data->{itemize} =~ m/^[c>]([fd])/ ) { # received change/create
                my $type = $1;
-               if ( -e $json_path ) {
-                       modify_existing $json_path;
+               if ( -e $path ) {
+                       modify_existing $path;
                        return $json;
                }
 
                if ( $type eq 'f' ) {
-                       if ( $json_path =~ m{^(.+)/[^/]+$} ) { # have dir
+                       if ( $path =~ m{^(.+)/[^/]+$} ) { # have dir
                                make_path $1 if ! -e $1;
                        }
-                       write_file $json_path, $json;
+                       write_file $path, $json;
                } elsif ( $type eq 'd' ) {
-                       make_path $json_path;
+                       make_path $path;
                }
        } elsif ( $data->{itemize} =~ m/\*deleting/ ) {
-               if ( -d $json_path ) {
-                       remove_path $json_path;
-               } elsif ( -f $json_path ) {
-                       remove_file $json_path;
+               if ( -d $path ) {
+                       remove_path $path;
+               } elsif ( -f $path ) {
+                       remove_file $path;
                }
        }
        return $json;