summaryrefslogtreecommitdiff
path: root/Property
diff options
context:
space:
mode:
authorJoey Hess2014-03-30 21:01:18 -0400
committerJoey Hess2014-03-30 21:01:18 -0400
commitcc16366ff2998866fa3b222114cb989985b48359 (patch)
tree93fae5039b1b723723a8bcea32aeed7821c1d956 /Property
parent409cb20373f65c784f1430322b5f28bc58d34943 (diff)
propellor spin
Diffstat (limited to 'Property')
-rw-r--r--Property/Docker.hs11
1 files changed, 11 insertions, 0 deletions
diff --git a/Property/Docker.hs b/Property/Docker.hs
new file mode 100644
index 00000000..9d01d0b3
--- /dev/null
+++ b/Property/Docker.hs
@@ -0,0 +1,11 @@
+module Property.Docker where
+
+import Common
+import qualified Property.File as File
+
+{- Configures docker with an authentication file, so that images can be
+ - pushed to index.docker.io. -}
+configured :: Property
+configured = Property "docker configured" $
+ withPrivData DockerAuthentication $ \cfg ->
+ ensureProperty $ "/root/.dockercfg" `File.hasContent` (lines cfg)