[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [PATCH] gnu: Add u-boot.
From: |
David Craven |
Subject: |
Re: [PATCH] gnu: Add u-boot. |
Date: |
Wed, 31 Aug 2016 23:07:55 +0200 |
> I'm not totally against naming filenames "file" - or "f" for that matter -
> but I distinguish for good reason.
I believe I renamed your variables... xD
(replace 'install
+ (lambda* (#:key outputs make-flags #:allow-other-keys)
+ (let ((out (string-append (assoc-ref outputs "out") "/libexec")))
+ (mkdir-p out)
+ (for-each (lambda (name)
+ (let ((outname (string-append out "/" name)))
+ (mkdir-p (dirname outname))
+ (copy-file name outname)))
+ (find-files "." ".*\\.(bin|efi)$"))))))))))