14/28: gnu: ath9k-htc-firmware: Use INSTALL-FILE.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 65a3c342b0e53a23509ad479cb5140f09dd008bd
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Thu Mar 1 23:48:09 2018 +0100

    gnu: ath9k-htc-firmware: Use INSTALL-FILE.
    
    * gnu/packages/firmware.scm (ath9k-htc-firmware)[arguments]: Substitute
    INSTALL-FILE for COPY-FILE with MKDIR-P.
---
 gnu/packages/firmware.scm | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index 0e1539c..da7430b 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -71,11 +71,8 @@
            (lambda* (#:key outputs #:allow-other-keys)
              (let* ((out    (assoc-ref outputs "out"))
                     (fw-dir (string-append out "/lib/firmware")))
-               (mkdir-p fw-dir)
                (for-each (lambda (file)
-                           (copy-file file
-                                      (string-append fw-dir "/"
-                                                     (basename file))))
+                           (install-file file fw-dir))
                          (find-files "." "\\.fw$"))
               #t))))
        #:tests? #f))