From d80c32d3e15163d9b54902982f23cac16b4dbdd8 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 18 Nov 2017 13:08:39 -0700 Subject: fix name shadowing in Sbuild.useHostProxy --- src/Propellor/Property/Sbuild.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs index cffe2f5f..048b5cf1 100644 --- a/src/Propellor/Property/Sbuild.hs +++ b/src/Propellor/Property/Sbuild.hs @@ -252,12 +252,12 @@ update = Apt.update `before` Apt.upgrade `before` Apt.autoRemove -- -- This property is standardly used when the host has 'Apt.useLocalCacher'. useHostProxy :: Host -> Property (HasInfo + DebianLike) -useHostProxy host = case getProxyInfo of +useHostProxy h = case getProxyInfo of Nothing -> doNothing Just (Apt.HostAptProxy u) -> Apt.proxy u where getProxyInfo :: Maybe Apt.HostAptProxy - getProxyInfo = fromInfoVal . fromInfo . hostInfo $ host + getProxyInfo = fromInfoVal . fromInfo . hostInfo $ h aptCacheLine :: String aptCacheLine = "/var/cache/apt/archives /var/cache/apt/archives none rw,bind 0 0" -- cgit v1.2.3