%%%% Starting test gem
Group begin: gem
Test begin:
  test-name: "gem->guix-package"
  source-file: "tests/gem.scm"
  source-line: 46
  source-form: (test-assert "gem->guix-package" (mock ((guix import utils) url-fetch (lambda (url file-name) (match url ("https://rubygems.org/api/v1/gems/foo.json" (with-output-to-file file-name (lambda () (display test-json)))) (_ (error "Unexpected URL: " url))))) (match (gem->guix-package "foo") (((quote package) ((quote name) "ruby-foo") ((quote version) "1.0.0") ((quote source) ((quote origin) ((quote method) (quote url-fetch)) ((quote uri) ((quote rubygems-uri) "foo" (quote version))) ((quote sha256) ((quote base32) "1a270mlajhrmpqbhxcqjqypnvgrq4pgixpv3w9gwp1wrrapnwrzk")))) ((quote build-system) (quote ruby-build-system)) ((quote propagated-inputs) ((quote quasiquote) (("bundler" ((quote unquote) (quote bundler))) ("ruby-bar" ((quote unquote) (quote ruby-bar)))))) ((quote synopsis) "A cool gem") ((quote description) "A cool gem") ((quote home-page) "https://example.com") ((quote license) ((quote list) (quote expat) (quote asl2.0)))) #t) (x (pk (quote fail) x #f)))))
Test end:
  result-kind: fail
  actual-value: #f
Group end: gem
# of unexpected failures  1