From 3af85f832dd007296ec64ddc34beadd397481311 Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Fri, 13 Sep 2019 15:09:34 +0300 Subject: build-system/cargo: Remove unused function. * guix/build/cargo-build-system.scm (touch): Remove it. --- guix/build/cargo-build-system.scm | 3 --- 1 file changed, 3 deletions(-) (limited to 'guix/build/cargo-build-system.scm') diff --git a/guix/build/cargo-build-system.scm b/guix/build/cargo-build-system.scm index c69cae5afd..4be5443083 100644 --- a/guix/build/cargo-build-system.scm +++ b/guix/build/cargo-build-system.scm @@ -168,9 +168,6 @@ (define* (check #:key (apply invoke `("cargo" "test" ,@cargo-test-flags)) #t)) -(define (touch file-name) - (call-with-output-file file-name (const #t))) - (define* (install #:key inputs outputs skip-build? #:allow-other-keys) "Install a given Cargo package." (let* ((out (assoc-ref outputs "out"))) -- cgit v1.2.3