build-system/cargo: Remove unused function.

* guix/build/cargo-build-system.scm (touch): Remove it.
This commit is contained in:
Efraim Flashner 2019-09-13 15:09:34 +03:00
parent 43ffa11fdc
commit 3af85f832d
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -168,9 +168,6 @@ (define* (check #:key
(apply invoke `("cargo" "test" ,@cargo-test-flags)) (apply invoke `("cargo" "test" ,@cargo-test-flags))
#t)) #t))
(define (touch file-name)
(call-with-output-file file-name (const #t)))
(define* (install #:key inputs outputs skip-build? #:allow-other-keys) (define* (install #:key inputs outputs skip-build? #:allow-other-keys)
"Install a given Cargo package." "Install a given Cargo package."
(let* ((out (assoc-ref outputs "out"))) (let* ((out (assoc-ref outputs "out")))