14/70: Revert "bootstrap: mes-minimal: Update to mes-0.21."

[guix-commits]

janneke pushed a commit to branch wip-bootstrap
in repository guix.

commit 2c10149d22011732268a8c4d40629f3de378f003
Author: Jan Nieuwenhuizen <address@hidden>
Date:   Mon Dec 9 07:47:10 2019 +0100

    Revert "bootstrap: mes-minimal: Update to mes-0.21."
    
    This reverts commit 0c46d250b1aecd1182f165e16647f8a0854584dc.
---
 gnu/packages/make-bootstrap.scm | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scm
index 5435043..b8d1b2a 100644
--- a/gnu/packages/make-bootstrap.scm
+++ b/gnu/packages/make-bootstrap.scm
@@ -643,11 +643,11 @@ for `sh' in $PATH, and without nscd, and with static NSS 
modules."
     (inputs `(("mescc-tools" ,%mescc-tools-static)))))
 
 ;; Two packages: first build static, bare minimum content.
-(define %mes-minimal
+(define-public %mes-minimal
   ;; A minimal Mes without documentation.
   (let ((triplet "i686-unknown-linux-gnu"))
     (package
-      (inherit mes)
+      (inherit mes-0.19)
       (name "mes-minimal")
       (native-inputs
        `(("guile" ,guile-2.2)))
@@ -661,10 +661,15 @@ for `sh' in $PATH, and without nscd, and with static NSS 
modules."
            (add-after 'install 'strip-install
              (lambda _
                (let* ((out (assoc-ref %outputs "out"))
-                      (lib (string-append out "/lib"))
                       (share (string-append out "/share")))
-                 (delete-file-recursively (string-append lib "/guile"))
-                 (delete-file-recursively (string-append share 
"/guile")))))))))))
+                 (delete-file-recursively (string-append out "/lib/guile"))
+                 (delete-file-recursively (string-append share "/guile"))
+                 (delete-file-recursively (string-append share 
"/mes/scaffold"))
+
+                 (for-each delete-file
+                           (find-files
+                            (string-append share "/mes/lib")
+                            "\\.(h|c)")))))))))))
 
 ;; next remove store references.
 (define %mes-minimal-stripped