guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

03/10: gnu: make-linux-libre: Add extra-version parameter.


From: David Craven
Subject: 03/10: gnu: make-linux-libre: Add extra-version parameter.
Date: Tue, 13 Sep 2016 19:03:11 +0000 (UTC)

dvc pushed a commit to branch master
in repository guix.

commit a6d01325141f9718b3d3b9f409a884836118c079
Author: David Craven <address@hidden>
Date:   Thu Sep 8 18:06:22 2016 +0200

    gnu: make-linux-libre: Add extra-version parameter.
    
    * gnu/packages/linux.scm (make-linux-libre): Add extra-version option.
---
 gnu/packages/linux.scm |    7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 1cf80cf..fac0cbb 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -276,11 +276,14 @@ for ARCH and optionally VARIANT, or #f if there is no 
such configuration."
                            #:key
                            ;; A function that takes an arch and a variant.
                            ;; See kernel-config for an example.
+                           (extra-version #f)
                            (configuration-file #f)
                            (defconfig "defconfig")
                            (extra-options %default-extra-linux-options))
   (package
-    (name "linux-libre")
+    (name (if extra-version
+              (string-append "linux-libre-" extra-version)
+              "linux-libre"))
     (version version)
     (source (origin
               (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'~%"
                          (getenv "CROSS_COMPILE"))))
 
+             (setenv "EXTRA_VERSION" ,extra-version)
+
              (let ((build  (assoc-ref %standard-phases 'build))
                    (config (assoc-ref inputs "kconfig")))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]