[bug#61454] [PATCH 1/5] gnu: linux-libre 4.14: Expose upstream sources.

[jlicht]

From: Jelle Licht <jlicht@fsfe.org>

* gnu/packages/linux.scm (linux-libre-4.14-pristine-source): Re-use extracted
upstream sources from ...
(linux-4.14-source): ... new variable.
---
 gnu/packages/linux.scm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 4130cdb4ed..b0e1f212fd 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -567,12 +567,13 @@ (define deblob-scripts-4.14
    linux-libre-4.14-gnu-revision
    (base32 "02rxvr0gmxb3zfsyyzdmzgfq04gkdkv1cc38md0xfl0mxzdzdfyk")
    (base32 "00i91lx938nqlgy63hiricqd0fnbbf26vgya9c5lb7m1f4x324im")))
-(define-public linux-libre-4.14-pristine-source
+(define-public linux-4.14-source
   (let ((version linux-libre-4.14-version)
         (hash (base32 "16lmhxqpbhyqmgmlyicjadzz3axhl5smfrr230x45ahkdghwsnx3")))
-    (make-linux-libre-source version
-                             (%upstream-linux-source version hash)
-                             deblob-scripts-4.14)))
+    (%upstream-linux-source version hash)))
+(define-public linux-libre-4.14-pristine-source
+  (let ((version linux-libre-4.14-version))
+    (make-linux-libre-source version linux-4.14-source deblob-scripts-4.14)))
 
 (define %boot-logo-patch
   ;; Linux-Libre boot logo featuring Freedo and a gnu.
-- 
2.39.1