prepare for hackage

1 files changed, 16 insertions, 0 deletions

diff --git a/Propellor/Property/Docker.hs b/Propellor/Property/Docker.hs
new file mode 100644
index 00000000..744feb42
--- /dev/null
+++ b/Propellor/Property/Docker.hs
@@ -0,0 +1,16 @@
+module Propellor.Property.Docker where
+
+import Propellor.Common
+import qualified Propellor.Property.File as File
+import qualified Propellor.Property.Apt as Apt
+
+{- | Configures docker with an authentication file, so that images can be
+ - pushed to index.docker.io. -}
+configured :: Property
+configured = Property "docker configured" go `requires` installed
+  where
+	go = withPrivData DockerAuthentication $ \cfg -> ensureProperty $ 
+		"/root/.dockercfg" `File.hasContent` (lines cfg)
+	
+installed :: Property
+installed = Apt.installed ["docker.io"]