09/13: bootstrap: Add mes-boot0; decouple mes-boot from Mes.

[guix-commits]

janneke pushed a commit to branch core-updates
in repository guix.

commit ef809e3ac036eccc5f9c9edd8fb661d14ae15f2f
Author: Jan Nieuwenhuizen <address@hidden>
Date:   Fri Dec 14 19:21:59 2018 +0100

    bootstrap: Add mes-boot0; decouple mes-boot from Mes.
    
    * gnu/packages/commencement.scm (mes-boot0): New variable.
    (mes-boot): Use it.
---
 gnu/packages/commencement.scm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index 108db5a..babad13 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -81,11 +81,36 @@
 ;;;
 ;;; Code:
 
+(define mes-boot0
+  (let ((version "0.18")
+        (revision "1")
+        (commit "a155a0a9a2d941b15c1b98e5cce787de40a8dacd"))
+    (package
+      (inherit mes)
+      (name "mes-boot0")
+      (version (if commit (string-append version "-" revision "." (string-take 
commit 7))
+                   version))
+      (source (if commit
+                  (origin
+                (method url-fetch)
+                (uri (string-append
+                      "https://git.savannah.gnu.org/cgit/mes.git/snapshot/";
+                      "mes" "-" commit
+                      ".tar.gz"))
+                (sha256
+                 (base32
+                  "14siwfwg0zlf1pa4ah8s08gsxqcazhydbwa9qvybb0knxs27aicn")))
+                  (package-source mes)))
+      (native-inputs '())
+      (propagated-inputs '()))))
+
 (define mes-boot
   (package-with-bootstrap-guile
    (package
      (inherit mes)
      (name "mes-boot")
+     (version (package-version mes-boot0))
+     (source (package-source mes-boot0))
      (inputs '())
      (propagated-inputs '())
      (native-inputs