#:use-module (guix import crate)
#:use-module (guix base32)
#:use-module (guix build-system cargo)
- #:use-module (guix hash)
+ #:use-module (gcrypt hash)
#:use-module (guix tests)
#:use-module (ice-9 iconv)
#:use-module (ice-9 match)
\"license\": \"MIT/Apache-2.0\",
\"description\": \"summary\",
\"homepage\": \"http://example.com\",
+ \"repository\": \"http://example.com\",
}
}")
(test-assert "crate->guix-package"
;; Replace network resources with sample data.
(mock ((guix http-client) http-fetch
- (lambda (url)
+ (lambda (url . rest)
(match url
("https://crates.io/api/v1/crates/foo"
(open-input-string test-crate))
('build-system 'cargo-build-system)
('inputs
('quasiquote
- (("rust-bar" ('unquote 'rust-bar)))))
+ (("rust-bar" ('unquote 'rust-bar) "src"))))
('home-page "http://example.com")
('synopsis "summary")
('description "summary")