From 380c1b0fd6c25dec3c924b82f1d721aa91a001da Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sun, 30 Mar 2014 23:37:54 -0400
Subject: prepare for hackage

---
 Propellor/Property/Docker.hs | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 Propellor/Property/Docker.hs

(limited to 'Propellor/Property/Docker.hs')

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"]
-- 
cgit v1.3-2-g0d8e