build-system/cargo: Remove unused function.

* guix/build/cargo-build-system.scm (touch): Remove it.
2019-09-13 15:09:34 +03:00 · 2019-09-13 15:09:34 +03:00 · 3af85f832d
parent 43ffa11fdc
commit 3af85f832d
1 changed files with 0 additions and 3 deletions
--- 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")))