From 228154cf1f1c9c28f933a7e073f421ba0b876275 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 4 Dec 2014 16:27:54 -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 02d5f47..e09b3d8 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" $ - return NoChange + return FailedChange -- unmount all mounts -- move all directories to /old-os, -- move /new-os to / -- touch flagfile propellorbootstrapped = property "propellor re-debootstrapped in new os" $ - return NoChange + return FailedChange -- 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"