aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/import/crate.scm4
-rw-r--r--tests/crate.scm2
2 files changed, 3 insertions, 3 deletions
diff --git a/guix/import/crate.scm b/guix/import/crate.scm
index 9a73d9fe16..29318aac0e 100644
--- a/guix/import/crate.scm
+++ b/guix/import/crate.scm
@@ -85,14 +85,14 @@
(()
'())
((package-inputs ...)
- `((#:cargo-inputs ,package-inputs)))))
+ `(#:cargo-inputs ,package-inputs))))
(define (maybe-cargo-development-inputs package-names)
(match (package-names->package-inputs package-names)
(()
'())
((package-inputs ...)
- `((#:cargo-development-inputs ,package-inputs)))))
+ `(#:cargo-development-inputs ,package-inputs))))
(define (maybe-arguments arguments)
(match arguments
diff --git a/tests/crate.scm b/tests/crate.scm
index a4a328d507..72c3a13350 100644
--- a/tests/crate.scm
+++ b/tests/crate.scm
@@ -91,7 +91,7 @@
('build-system 'cargo-build-system)
('arguments
('quasiquote
- (('#:cargo-inputs (("rust-bar" ('unquote rust-bar)))))))
+ ('#:cargo-inputs (("rust-bar" ('unquote rust-bar))))))
('home-page "http://example.com")
('synopsis "summary")
('description "summary")
(package (name "i2pd") (version "2.44.0") (source (origin (method git-fetch) (uri (git-reference (url "https://github.com/PurpleI2P/i2pd") (commit version))) (file-name (git-file-name name version)) (sha256 (base32 "0fwaalfxqdahgvx5rfkvdmf6gl10w328a18ddhyn5kvpmp9x7fgl")))) (build-system cmake-build-system) (inputs (list boost miniupnpc openssl zlib)) (arguments '(#:configure-flags (let ((source (assoc-ref %build-inputs "source"))) (list (string-append "-S" source "/build") "-DWITH_PCH=OFF" "-DWITH_STATIC=OFF" "-DWITH_UPNP=ON" "-DWITH_LIBRARY=ON" "-DBUILD_SHARED_LIBS=ON" "-DWITH_BINARY=ON")) #:phases (modify-phases %standard-phases (replace 'check (lambda* (#:key tests? (make-flags '()) (parallel-tests? #t) #:allow-other-keys) (let ((source (assoc-ref %build-inputs "source"))) (when tests? (copy-recursively (string-append source "/tests") "./tests") (with-directory-excursion "tests" (substitute* "Makefile" (("../libi2pd") (string-append source "/libi2pd"))) (apply invoke "make" "all" `(,@(if parallel-tests? `("-j" ,(number->string (parallel-job-count))) '()) ,@make-flags)))))))))) (home-page "https://i2pd.website/") (synopsis "Router for an end-to-end encrypted and anonymous internet") (description "i2pd is a client for the anonymous I2P network, upon which applications for file sharing, web browsing, instant messaging, and more are built. i2pd allows people from all around the world to communicate and share information securely without restrictions.") (license license:bsd-3)))