From 1501509f5dfb5c93fd572f472756c96905d41ce4 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 26 Feb 2016 11:02:36 -0400 Subject: Removed Ssh.unauthorizedKey and made Ssh.authorizedKey revertable. (API change) --- src/Propellor/Property/OS.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Propellor/Property/OS.hs') diff --git a/src/Propellor/Property/OS.hs b/src/Propellor/Property/OS.hs index 5678b818..5f1adddb 100644 --- a/src/Propellor/Property/OS.hs +++ b/src/Propellor/Property/OS.hs @@ -221,7 +221,7 @@ preserveRootSshAuthorized :: Property NoInfo preserveRootSshAuthorized = check (fileExist oldloc) $ property (newloc ++ " copied from old OS") $ do ks <- liftIO $ lines <$> readFile oldloc - ensureProperties (map (Ssh.authorizedKey (User "root")) ks) + ensureProperties (map (setupRevertableProperty . Ssh.authorizedKey (User "root")) ks) where newloc = "/root/.ssh/authorized_keys" oldloc = oldOSDir ++ newloc -- cgit v1.3-2-g0d8e