From 9dad69313101a3f45f63ce2e2d2a2c11c27f058d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 2 Sep 2015 11:17:53 -0700 Subject: propellor spin --- src/Propellor/Property/DiskImage.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Propellor/Property/DiskImage.hs b/src/Propellor/Property/DiskImage.hs index 00bb465f..bd7178cc 100644 --- a/src/Propellor/Property/DiskImage.hs +++ b/src/Propellor/Property/DiskImage.hs @@ -80,6 +80,7 @@ built' rebuild img mkchroot mkparttable final = szm <- liftIO $ M.map toPartSize <$> dirSizes chrootdir -- tie the knot! let (mnts, t) = mkparttable (map (getMountSz szm) mnts) + liftIO $ print (mnts, t) ensureProperty $ exists img (partTableSize t) `before` -- cgit v1.2.3