anchor.diff:    ?assertEqual(ok, CountStatus3),
     ?assertEqual(length(User1FilesEnding) * FileSize + FileSize, Count3),
   
  -  AnsDelete = FM(delete, [User1TestUpdateFile], DN1),
  -  ?assertEqual(ok, AnsDelete),
  -
  -  lists:foreach(fun(FileEnding) ->
  -    FileName = FileBeg ++ FileEnding,
  -    AnsDelete = FM(delete, [FileName], DN1),
  -    ?assertEqual(ok, AnsDelete)
  -  end, User1FilesEnding),
  -
  -  lists:foreach(fun(FileEnding) ->
  -    FileName = FileBeg ++ FileEnding,
  -    AnsDelete = FM(delete, [FileName], DN2),
  -    ?assertEqual(ok, AnsDelete)
  -  end, User2FilesEnding),
  -
     wss:close(Socket1),
  -  wss:close(Socket2),
  -
  -  RemoveStorageAns = rpc:call(Node, dao_lib, apply, [dao_vfs, remove_storage, [{uuid, StorageUUID}], ?ProtocolVersion]),
  -  ?assertEqual(ok, RemoveStorageAns),
  -
  -  RemoveUserAns = rpc:call(Node, user_logic, remove_user, [{dn, DN1}]),
  -  ?assertEqual(ok, RemoveUserAns),
  -  RemoveUserAns2 = rpc:call(Node, user_logic, remove_user, [{dn, DN2}]),
  -  ?assertEqual(ok, RemoveUserAns2).
  +  wss:close(Socket2).
   
   %% Checks permissions management functions
   %% The tests checks some files and then changes their permissions. Erlang functions are used to test if permissions were change properly.
  
positive.code:   ?assertEqual(ok, CountStatus2),
    ?assertEqual(length(User2FilesEnding), Count2),
  
  	wss:close(Socket),
  	wss:close(Socket2).
  
  %% Checks user files size view.
  %% The test creates some files for two users, and then checks if the view counts their size properly.
  
negative.code: 
    lists:foreach(fun(FileEnding) ->
      FileName = FileBeg ++ FileEnding,
      AnsCreate = FM(create, [FileName], DN1),
      ?assertEqual(ok, AnsCreate),
      AnsTruncate = FM(truncate, [FileName, FileSize], DN1),
      ?assertEqual(ok, AnsTruncate),
      {AnsGetFileAttr, _} = FM(getfileattr, [FileName], DN1),
      ?assertEqual(ok, AnsGetFileAttr)
    end, User1FilesEnding),
  
    lists:foreach(fun(FileEnding) ->
      FileName = FileBeg ++ FileEnding,
      AnsCreate = FM(create, [FileName], DN2),
      ?assertEqual(ok, AnsCreate),
      AnsTruncate = FM(truncate, [FileName, FileSize], DN2),
      ?assertEqual(ok, AnsTruncate),
      {AnsGetFileAttr, _} = FM(getfileattr, [FileName], DN2),
      ?assertEqual(ok, AnsGetFileAttr)
    end, User2FilesEnding),
  