store modified JSON

diff --git a/lib/CloudStore/JSON.pm b/lib/CloudStore/JSON.pm
index 8e54894..c961350 100644 (file)
--- a/lib/CloudStore/JSON.pm
+++ b/lib/CloudStore/JSON.pm
@@ -29,6 +29,7 @@ sub write_file {
 
 sub modify_existing {
        warn "### VFS modify_existing $_[0]\n";
+       File::Slurp::write_file(@_);
 }
 
 sub rsync_transfer {
@@ -41,7 +42,6 @@ sub rsync_transfer {
                my $type = $1;
                if ( -e $path ) {
                        modify_existing $path;
-                       return $json;
                }
 
                if ( $type eq 'f' ) {