anchor.diff:      % Delete storage test file after 'delete_storage_test_file_time' seconds
       spawn(fun() ->
         timer:sleep(DeleteStorageTestFileTime * 1000),
  -      storage_files_manager:delete(StorageHelperInfo, Path)
  +      case storage_files_manager:delete(StorageHelperInfo, Path) of
  +        ok -> ok;
  +        {_, Error} -> ?error("Error while deleting  storage test file: ~p", [Error])
  +      end
       end),
       Length = storage_files_manager:write(StorageHelperInfo, Path, Text),
       #createstoragetestfileresponse{answer = true, relative_path = Path, text = Text}
     catch
  -    _:_ -> #createstoragetestfileresponse{answer = false}
  +    _:_ ->
  +      ?error("Error while creating storage test file."),
  +      #createstoragetestfileresponse{answer = false}
     end;
   
   handle_fuse_message(ProtocolVersion, Record, _FuseID) when is_record(Record, storagetestfilemodifiedrequest) ->
  
positive.code:   {A, B, C} = now(),
    random:seed(A, B, C),
    Filename = random_ascii_lowercase_sequence(8),
    Path = "users/" ++ Login ++ "/" ++ Filename,
    case storage_files_manager:create(StorageHelperInfo, Path) of
      ok -> {ok, Path};
      _ -> create_storage_test_file(StorageHelperInfo, Login, Attempts - 1)
  
negative.code:     StorageHelperInfo = fslogic_storage:get_sh_for_fuse(?CLUSTER_FUSE_ID, StorageInfo),
      {ok, Bytes} = storage_files_manager:read(StorageHelperInfo, Path, 0, length(Text)),
      Text = binary_to_list(Bytes),
      case storage_files_manager:delete(StorageHelperInfo, Path) of
        ok -> ok;
        {_, Error} -> ?error("Error while deleting  storage test file: ~p", [Error])
      end,
      #storagetestfilemodifiedresponse{answer = true}
    catch
      _:_ ->
        ?error("Error while checking storage test file modification."),
        #storagetestfilemodifiedresponse{answer = false}
    end;
  
  handle_fuse_message(ProtocolVersion, Record, FuseId) when is_record(Record, clientstorageinfo) ->
  