me
/
guix
Archived
1
0
Fork 0
Code

gnu: make-linux-libre: Add extra-version parameter. 

* gnu/packages/linux.scm (make-linux-libre): Add extra-version option.
master
David Craven 2016-09-08 18:06:22 +02:00
parent 90c18c321e
commit a6d0132514
No known key found for this signature in database
GPG Key ID: C5E051C79C0BECDB
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gnu/packages/linux.scm
View File

@ -276,11 +276,14 @@ for ARCH and optionally VARIANT, or #f if there is no such configuration."
#:key #:key
;; A function that takes an arch and a variant. ;; A function that takes an arch and a variant.
;; See kernel-config for an example. ;; See kernel-config for an example.
(extra-version #f)
(configuration-file #f) (configuration-file #f)
(defconfig "defconfig") (defconfig "defconfig")
(extra-options %default-extra-linux-options)) (extra-options %default-extra-linux-options))
(package (package
(name "linux-libre") (name (if extra-version
(string-append "linux-libre-" extra-version)
"linux-libre"))
(version version) (version version)
(source (origin (source (origin
(method url-fetch) (method url-fetch)
@ -327,6 +330,8 @@ for ARCH and optionally VARIANT, or #f if there is no such configuration."
(format #t "`CROSS_COMPILE' set to `~a'~%" (format #t "`CROSS_COMPILE' set to `~a'~%"
(getenv "CROSS_COMPILE")))) (getenv "CROSS_COMPILE"))))
(setenv "EXTRA_VERSION" ,extra-version)
(let ((build (assoc-ref %standard-phases 'build)) (let ((build (assoc-ref %standard-phases 'build))
(config (assoc-ref inputs "kconfig"))) (config (assoc-ref inputs "kconfig")))