Permalink
Browse files

Add test/domain.com config for Route 53 test.

  • Loading branch information...
1 parent d27b1b1 commit 07d2294058004bdf079fa26ae3e97270c6a84253 @greghendershott committed Nov 27, 2012
Showing with 13 additions and 2 deletions.
  1. +5 −2 r53.rkt
  2. +5 −0 tests/data.rkt
  3. +3 −0 tests/example-dot-aws-tests-data
View
@@ -182,13 +182,16 @@
(def/run-test-suite
(test-case
"Route53 create/delete hosted zone"
- (define x (create-hosted-zone "foo.com" "unique3" "some comment"))
+ (ensure-have-keys)
+ (define x (create-hosted-zone (test/domain.com)
+ (format "unique-~a" (current-seconds))
+ "some comment"))
(check-true (xexpr? x))
(define zid (first-tag-value x 'Id))
(check-true (string? zid))
(delete-hosted-zone zid))
(test-case
- "Route53"
+ "Route53 read-only record sets"
(ensure-have-keys)
(define zs (list-hosted-zones))
(define zid (first-tag-value zs 'Id)) ;just grab first one
View
@@ -105,3 +105,8 @@
;; used by dyamo.rkt
(def/prov test/dynamo-table)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; used by r53.rkt
+
+(def/prov test/domain.com)
@@ -57,3 +57,6 @@ test/vault = testvault
# Name of a test table on Dynamo
test/dynamo-table = test-dynamo-table
+
+# Name of a hosted zone on Route 53
+test/domain.com = test.com.

0 comments on commit 07d2294

Please sign in to comment.