From 05ad6ad130139333e6029f4ea7cc05e3c7ed1bf0 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 4 Dec 2014 16:25:12 -0400 Subject: [PATCH] propellor spin --- src/Propellor/Property/OS.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Propellor/Property/OS.hs b/src/Propellor/Property/OS.hs index f06e1b7..02d5f47 100644 --- a/src/Propellor/Property/OS.hs +++ b/src/Propellor/Property/OS.hs @@ -73,21 +73,21 @@ cleanInstallOnce confirmation = check (not <$> doesFileExist flagfile) $ Debootstrap.built "/new-os" targetos Debootstrap.DefaultConfig transitioned = property "/new-os moved into place" $ - error "TODO" + return NoChange -- unmount all mounts -- move all directories to /old-os, -- move /new-os to / -- touch flagfile propellorbootstrapped = property "propellor re-debootstrapped in new os" $ - error "TODO" + return NoChange -- re-bootstrap propellor in /usr/local/propellor, -- (using git repo bundle, privdata file, and possibly -- git repo url, which all need to be arranged to -- be present in /old-os's /usr/local/propellor) finalized = property "clean install finalized" $ do - liftIO $ writeFile flagfile "" + --liftIO $ writeFile flagfile "" return MadeChange flagfile = "/etc/propellor-cleaninstall"