diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-10-15 23:42:58 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-10-15 23:42:58 +0200 |
| commit | dfb52abbd60876de250f04fc5c64b3c85082cba6 (patch) | |
| tree | 1ba75d6d5d217253dcb161a8dbf1387199ae577b /gnu/packages/linux-initrd.scm | |
| parent | 59fbeb8cae02032a2f8b7966ab52545817f3ed88 (diff) | |
| download | patches-dfb52abbd60876de250f04fc5c64b3c85082cba6.tar patches-dfb52abbd60876de250f04fc5c64b3c85082cba6.tar.gz | |
Remove weirdnesses caused by 'letrec*' behavior of record field initializers.
* gnu/packages/bootstrap.scm (package-from-tarball): Remove '*' from
parameter names. Adjust accordingly.
* gnu/packages/linux-initrd.scm (expression->initrd): Use 'name'
directly, removing the 'name*' alias.
* gnu/packages/linux.scm (linux-libre-headers, linux-libre): Rename
'version*' to 'version'.
Diffstat (limited to 'gnu/packages/linux-initrd.scm')
| -rw-r--r-- | gnu/packages/linux-initrd.scm | 41 |
1 files changed, 20 insertions, 21 deletions
diff --git a/gnu/packages/linux-initrd.scm b/gnu/packages/linux-initrd.scm index ed30fa56b1..0134e89da8 100644 --- a/gnu/packages/linux-initrd.scm +++ b/gnu/packages/linux-initrd.scm @@ -212,28 +212,27 @@ list of Guile module names to be embedded in the initrd." (and (zero? (system* gzip "--best" "initrd")) (rename-file "initrd.gz" "initrd"))))))))) - (let ((name* name)) - (package - (name name*) - (version "0") - (source #f) - (build-system trivial-build-system) - (arguments `(#:modules ((guix build utils)) - #:builder ,builder)) - (inputs `(("guile" ,guile) - ("cpio" ,cpio) - ("gzip" ,gzip) - ("modules" ,(module-package modules)) - ("modules/compiled" ,(compiled-module-package modules)) - ,@(if linux - `(("linux" ,linux)) - '()))) - (synopsis "An initial RAM disk (initrd) for the Linux kernel") - (description - "An initial RAM disk (initrd), really a gzipped cpio archive, for use by + (package + (name name) + (version "0") + (source #f) + (build-system trivial-build-system) + (arguments `(#:modules ((guix build utils)) + #:builder ,builder)) + (inputs `(("guile" ,guile) + ("cpio" ,cpio) + ("gzip" ,gzip) + ("modules" ,(module-package modules)) + ("modules/compiled" ,(compiled-module-package modules)) + ,@(if linux + `(("linux" ,linux)) + '()))) + (synopsis "An initial RAM disk (initrd) for the Linux kernel") + (description + "An initial RAM disk (initrd), really a gzipped cpio archive, for use by the Linux kernel.") - (license gpl3+) - (home-page "http://www.gnu.org/software/guix/")))) + (license gpl3+) + (home-page "http://www.gnu.org/software/guix/"))) (define-public qemu-initrd (expression->initrd |