summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Sbuild.hs
diff options
context:
space:
mode:
authorSean Whitton2016-05-21 14:01:25 +0900
committerSean Whitton2016-05-21 14:01:25 +0900
commit60e7991181e6459e2a4f200072190e1cd98caa7d (patch)
tree9ef5f20c61c709d1aa2f1ba626c09bfc32e45e01 /src/Propellor/Property/Sbuild.hs
parent76cc003f421a30f2d380a4f619812466cfa1dc8a (diff)
also move link in /etc/sbuild/chroot
Diffstat (limited to 'src/Propellor/Property/Sbuild.hs')
-rw-r--r--src/Propellor/Property/Sbuild.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs
index 202108a4..64d4911c 100644
--- a/src/Propellor/Property/Sbuild.hs
+++ b/src/Propellor/Property/Sbuild.hs
@@ -195,6 +195,9 @@ fixConfFile s@(SbuildSchroot suite arch) =
confs <- liftIO $ dirContents dir
let old = concat $ filter (tempPrefix `isPrefixOf`) confs
liftIO $ moveFile old new
+ liftIO $ moveFile
+ ("/etc/sbuild/chroot" </> show s ++ "-propellor")
+ ("/etc/sbuild/chroot" </> show s ++ "-sbuild")
ensureProperty w $
File.fileProperty "replace dummy suffix" (map munge) new
where