From af385a33a04e217f7b41ec87bc8e923cda70582f Mon Sep 17 00:00:00 2001 From: des Date: Mon, 27 Nov 2000 13:42:56 +0000 Subject: Fix old-style proxy specs: default to FTP if FTP_PROXY was set; only default to HTTP if HTTP_PROXY was used instead. --- lib/libfetch/ftp.c | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/libfetch/ftp.c b/lib/libfetch/ftp.c index ab2c54d..d9f624e 100644 --- a/lib/libfetch/ftp.c +++ b/lib/libfetch/ftp.c @@ -876,8 +876,12 @@ _ftp_get_proxy(void) if (((p = getenv("FTP_PROXY")) || (p = getenv("HTTP_PROXY"))) && *p && (purl = fetchParseURL(p)) != NULL) { - if (!*purl->scheme) - strcpy(purl->scheme, SCHEME_HTTP); + if (!*purl->scheme) { + if (getenv("FTP_PROXY")) + strcpy(purl->scheme, SCHEME_FTP); + else + strcpy(purl->scheme, SCHEME_HTTP); + } if (!purl->port) purl->port = _fetch_default_proxy_port(purl->scheme); if (strcasecmp(purl->scheme, SCHEME_FTP) == 0 || -- cgit v1.1