From b01d6fab5e8aa2120485884062ff3e03709ef626 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 2 Sep 2015 12:17:44 -0700 Subject: todos --- src/Propellor/Property/DiskImage.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/Propellor/Property/DiskImage.hs b/src/Propellor/Property/DiskImage.hs index b31aef45..7820c4c3 100644 --- a/src/Propellor/Property/DiskImage.hs +++ b/src/Propellor/Property/DiskImage.hs @@ -80,8 +80,10 @@ built' rebuild img mkchroot mkparttable final = szm <- liftIO $ M.mapKeys tosysdir . M.map toPartSize <$> dirSizes chrootdir -- tie the knot! + -- TODO when /boot is in part table, size of / + -- should be reduced by sie of /boot + -- TODO if any size is < 1 MB, use 1 MB for sanity let (mnts, t) = mkparttable (map (getMountSz szm) mnts) - liftIO $ print (mnts, t, map (getMountSz szm) mnts) ensureProperty $ exists img (partTableSize t) `before` -- cgit v1.2.3