summaryrefslogtreecommitdiff
path: root/aws/cloudformation
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2018-11-30 12:17:11 -0500
committerDavid Thompson <dthompson2@worcester.edu>2018-11-30 12:17:29 -0500
commit9af29b8d14a218c9ee583a69f7b44a0e46e22c13 (patch)
tree8e5ee73703f05e0adecca75929035a1d602a0911 /aws/cloudformation
parenteea9dd7be5a5e2d79e2d42d15da5125e66946969 (diff)
Remove json-assoc-ref procedure.
Diffstat (limited to 'aws/cloudformation')
-rw-r--r--aws/cloudformation/utils/json.scm7
1 files changed, 1 insertions, 6 deletions
diff --git a/aws/cloudformation/utils/json.scm b/aws/cloudformation/utils/json.scm
index 11ca6bf..1b30e51 100644
--- a/aws/cloudformation/utils/json.scm
+++ b/aws/cloudformation/utils/json.scm
@@ -19,12 +19,7 @@
(define-module (aws cloudformation utils json)
#:use-module (ice-9 match)
- #:export (read-json json-assoc-ref write-json))
-
-(define (json-assoc-ref json key)
- (match (assoc-ref json key)
- (('@ . alist) alist)
- (x x)))
+ #:export (read-json write-json))
(define (json-error port)
(throw 'json-error port))