--- guix/import/crate.scm.prev 2020-03-24 17:44:45.000000000 +0300 +++ guix/import/crate.scm 2020-09-24 23:16:07.076901808 +0300 @@ -52,6 +52,7 @@ ;; Crates. A crate is essentially a "package". It can have several ;; "versions", each of which has its own set of dependencies, license, ;; etc.--see below. +(use-modules (json record)) (define-json-mapping make-crate crate? json->crate (name crate-name) ;string --- guix/swh.scm.prev 2020-03-10 22:19:30.000000000 +0300 +++ guix/swh.scm 2020-09-24 23:11:45.910912646 +0300 @@ -251,6 +251,7 @@ docstring (call (swh-url components ...) json->value))))) +(use-modules (json record)) ;; (define-json-mapping make-origin origin? json->origin --- guix/cve.scm.prev 2019-10-23 17:40:23.000000000 +0300 +++ guix/cve.scm 2020-09-24 23:12:16.596911372 +0300 @@ -70,6 +70,7 @@ (define (string->date* str) (string->date str "~Y-~m-~dT~H:~M~z")) +(use-modules (json record)) (define-json-mapping cve-item cve-item? json->cve-item (cve cve-item-cve "cve" json->cve) ; --- guix/ci.scm.prev 2020-03-31 15:55:42.000000000 +0300 +++ guix/ci.scm 2020-09-24 23:08:53.074919818 +0300 @@ -52,6 +52,8 @@ ;;; ;;; Code: +(use-modules (json record)) + (define-json-mapping make-build build? json->build (id build-id "id") ;integer