download: Remove spurious warning about 'https_proxy'.

* guix/build/download.scm (open-connection-for-uri)[with-https-proxy]: Warn
  about 'https_proxy' only when 'getenv' returns a non-empty string.
This commit is contained in:
Ludovic Courtès 2015-07-17 22:31:12 +02:00
parent b78cad85d3
commit 4f7b564adb
1 changed files with 2 additions and 1 deletions

View File

@ -231,7 +231,8 @@ host name without trailing dot."
(resolve-interface '(web client)) (resolve-interface '(web client))
'current-http-proxy)) 'current-http-proxy))
(parameterize ((current-http-proxy #f)) (parameterize ((current-http-proxy #f))
(when (getenv "https_proxy") (when (and=> (getenv "https_proxy")
(negate string-null?))
(format (current-error-port) (format (current-error-port)
"warning: 'https_proxy' is ignored~%")) "warning: 'https_proxy' is ignored~%"))
(thunk)) (thunk))