avoid setting seed until we name the seed

1 files changed, 0 insertions, 7 deletions

diff --git a/fsmgr.hs b/fsmgr.hs
index 2aff987..00f840b 100644
--- a/fsmgr.hs
+++ b/fsmgr.hs
@@ -196,7 +196,6 @@ buildRoot config@DiskImageConfig{..} finalOut = do
     -- cleanup
     cmd_ "umount" [mountpoint]
     cmd_ "rmdir" [mountpoint]
-    cmd_ "btrfstune -S1" [out]
     cmd_ "mv" [out, finalOut]
 
 setupLoopDevices :: FilePath -> Action ()
@@ -233,8 +232,6 @@ buildInitialImage DiskImageConfig{..} mountpoint out = do
           need [buildDirParent]
           return buildDirParent
       cmd_ "cp --reflink" [parent, out]
-      cmd_ "btrfstune -f -S0" [out]
-      cmd_ "btrfstune -fu" [out]
       cmd_ "mkdir -p" [mountpoint]
       cmd_ "sh -c" ["if [ -e \"$0\" ]; then cp \"$0\" \"$1\"; fi", parent <.> "devices.txt", out -<.> "devices.txt"]
 
@@ -386,8 +383,6 @@ chrootImage target args =
       let mnt = tmp <.> "mnt"
       orderOnly [inp]
       cmd_ "cp --reflink=always" [inp, tmp]
-      cmd_ "btrfstune -S0 -f" [tmp]
-      cmd_ "btrfstune -fu" [tmp]
       cmd_ "mkdir" [mnt]
 
       setupLoopDevices target
@@ -401,7 +396,6 @@ chrootImage target args =
           else cmd_ (WithStderr False) "chroot" (mnt : args)
       cmd_ "umount" [mnt]
       cmd_ "sync"
-      cmd_ "btrfstune -S1" [tmp]
       cmd_ "mv" [tmp, inp]
 
 shakeBuildOneImage :: FilePath -> IO ()
@@ -469,7 +463,6 @@ shakeRules = do
         inp = dropExtension out -<.> ".btrfs"
     need [inp]
     cmd_ "cp --reflink=always" [inp, tmp]
-    cmd_ "btrfstune -f -S0" [tmp]
     cmd_ "btrfs-shrink" [tmp]
     cmd_ "btrfstune -f -S1" [tmp]
     cmd_ (WithStderr False) "mv -i" [tmp, out]