anchor.diff:                  Cookies[Cookie['name']] := Cookie['value'];
               end;
             end;
  -		finally
  -		  CookieMap.EndRead;
  -		end;
  -		if Names.Count > 0 then begin
  -	      CookieMap.BeginWrite;
  -		  try
  -		    for J := 0 to Names.Count - 1 do CookieMap.Delete(Names[J]);
  -		  finally
  -		    CookieMap.EndWrite;
  -		  end;
  -		end;
  +        finally
  +          CookieMap.EndRead;
  +        end;
  +        if Names.Count > 0 then begin
  +          CookieMap.BeginWrite;
  +          try
  +            for J := 0 to Names.Count - 1 do CookieMap.Delete(Names[J]);
  +          finally
  +            CookieMap.EndWrite;
  +          end;
  +        end;
         end;
       end;
       Result := Cookies.Join('; ');
  
positive.code:       Domain := VarToStr(CookieManager.Keys[I]);
        if AnsiPos(Domain, Host) <> 0 then begin
          CookieMap := VarToMap(CookieManager.Values[I]);
  		CookieMap.BeginRead;
  		try
            Names := TArrayList.Create(False);
            for J := 0 to CookieMap.Count - 1 do begin
              Cookie := VarToMap(CookieMap.Values[J]);
  
negative.code:  *                                                        *
   * hprose synapse http client unit for delphi.            *
   *                                                        *
   * LastModified: Jun 15, 2014                             *
   * Author: Ma Bingyao <andot@hprose.com>                  *
   *                                                        *
  \**********************************************************/
  