diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2017-07-30 19:03:10 -0700 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-08-01 15:33:48 -0400 |
| commit | 943b0489f17477102131030af750a1eb1669a4e2 (patch) | |
| tree | 622d96a63d56a8ea02905943c7e44d2e5e004821 | |
| parent | 4500a4d8dc0a98754a59d994957d5ea87558c351 (diff) | |
fix types
| -rw-r--r-- | src/Propellor/Property/Sbuild.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs index f5116c04..23f3b311 100644 --- a/src/Propellor/Property/Sbuild.hs +++ b/src/Propellor/Property/Sbuild.hs @@ -453,11 +453,12 @@ ccachePrepared = propertyList "sbuild group ccache configured" $ props -- this property is handy for quickly setting up build boxes. userConfig :: User -> Property DebianLike userConfig user@(User u) = go - `requires` usableBy + `requires` usableBy user `requires` Apt.installed ["piuparts", "autopkgtest", "lintian"] where + go :: Property DebianLike go = property' ("~/.sbuildrc for " ++ u) $ \w -> do - h <- liftIO (homedir user) + h <- liftIO (User.homedir user) ensureProperty w $ File.hasContent (h </> ".sbuildrc") [ "$run_lintian = 1;" , "" |