diff options
| author | Joey Hess <joeyh@joeyh.name> | 2017-07-21 12:52:45 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-07-21 12:52:45 -0400 |
| commit | 1fecbbd450b973018fc059ffc166e927698890cd (patch) | |
| tree | 9f115723d2217cb4d57d0fafb2e6c08ebe77ddfb | |
| parent | 940a2a58204a376cc15c6cd0bcd76d975ec8562e (diff) | |
improve comment
| -rw-r--r-- | src/Propellor/Property/DiskImage.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/DiskImage.hs b/src/Propellor/Property/DiskImage.hs index 9300b201..f8754f85 100644 --- a/src/Propellor/Property/DiskImage.hs +++ b/src/Propellor/Property/DiskImage.hs @@ -164,8 +164,8 @@ imageBuiltFrom img chrootdir tabletype final partspec = mkimg <!> rmimg where desc = img ++ " built from " ++ chrootdir mkimg = property' desc $ \w -> do - -- unmount helper filesystems such as proc from the chroot - -- before getting sizes + -- Unmount helper filesystems such as proc from the chroot + -- first; don't want to include the contents of those. liftIO $ unmountBelow chrootdir szm <- M.mapKeys (toSysDir chrootdir) . M.map toPartSize <$> liftIO (dirSizes chrootdir) |