The R Project SVN R

Rev

Rev 75960 | Rev 78045 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 75960 Rev 76515
Line 935... Line 935...
935
	return NULL;
935
	return NULL;
936
    }
936
    }
937
 
937
 
938
    // use keep-alive semantics, do not use local WinINet cache.
938
    // use keep-alive semantics, do not use local WinINet cache.
939
    DWORD flags = INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_NO_CACHE_WRITE |
939
    DWORD flags = INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_NO_CACHE_WRITE |
940
                  INTERNET_FLAG_IGNORE_REDIRECT_TO_HTTPS;
940
                  INTERNET_FLAG_IGNORE_REDIRECT_TO_HTTPS | INTERNET_FLAG_IGNORE_REDIRECT_TO_HTTP;
941
    if(!cacheOK) flags |= INTERNET_FLAG_PRAGMA_NOCACHE;
941
    if(!cacheOK) flags |= INTERNET_FLAG_PRAGMA_NOCACHE;
942
    wictxt->session = InternetOpenUrl(wictxt->hand, url, headers, headers ? -1 : 0, flags, 0);
942
    wictxt->session = InternetOpenUrl(wictxt->hand, url, headers, headers ? -1 : 0, flags, 0);
943
    if(!wictxt->session) {
943
    if(!wictxt->session) {
944
	DWORD err1 = GetLastError(), err2, blen = 101;
944
	DWORD err1 = GetLastError(), err2, blen = 101;
945
	InternetCloseHandle(wictxt->hand);
945
	InternetCloseHandle(wictxt->hand);