[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/07: gnu: mes-minimal: Remove unused variable.
From: |
guix-commits |
Subject: |
01/07: gnu: mes-minimal: Remove unused variable. |
Date: |
Mon, 26 Jul 2021 07:36:39 -0400 (EDT) |
civodul pushed a commit to branch core-updates
in repository guix.
commit 8b627a77014bc64bae2481fceeb28bcd61035b5b
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sun Jul 25 20:15:45 2021 +0200
gnu: mes-minimal: Remove unused variable.
* gnu/packages/make-bootstrap.scm (%mes-minimal): Remove unused
'triplet' variable.
---
gnu/packages/make-bootstrap.scm | 49 ++++++++++++++++++++---------------------
1 file changed, 24 insertions(+), 25 deletions(-)
diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scm
index 60b6f1b..32542f6 100644
--- a/gnu/packages/make-bootstrap.scm
+++ b/gnu/packages/make-bootstrap.scm
@@ -623,31 +623,30 @@ for `sh' in $PATH, and without nscd, and with static NSS
modules."
;; Two packages: first build static, bare minimum content.
(define-public %mes-minimal
;; A minimal Mes without documentation.
- (let ((triplet "i686-unknown-linux-gnu"))
- (package
- (inherit mes-0.19)
- (name "mes-minimal")
- (native-inputs
- `(("guile" ,guile-2.2)))
- (arguments
- `(#:system "i686-linux"
- #:strip-binaries? #f
- #:configure-flags '("--mes")
- #:phases
- (modify-phases %standard-phases
- (delete 'patch-shebangs)
- (add-after 'install 'strip-install
- (lambda _
- (let* ((out (assoc-ref %outputs "out"))
- (share (string-append out "/share")))
- (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)")))))))))))
+ (package
+ (inherit mes-0.19)
+ (name "mes-minimal")
+ (native-inputs
+ `(("guile" ,guile-2.2)))
+ (arguments
+ `(#:system "i686-linux"
+ #:strip-binaries? #f
+ #:configure-flags '("--mes")
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'patch-shebangs)
+ (add-after 'install 'strip-install
+ (lambda _
+ (let* ((out (assoc-ref %outputs "out"))
+ (share (string-append out "/share")))
+ (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
- branch core-updates updated (0236013 -> e2690a8), guix-commits, 2021/07/26
- 06/07: gnu: mes-minimal-stripped: Explicitly disallow references., guix-commits, 2021/07/26
- 04/07: gnu: mes: Switch to Guile 3.0., guix-commits, 2021/07/26
- 03/07: gnu: mescc-tools: Update to 1.2.0., guix-commits, 2021/07/26
- 07/07: gnu: mes-rb5: Remove., guix-commits, 2021/07/26
- 05/07: gnu: mes: Remove 0.19., guix-commits, 2021/07/26
- 02/07: gnu: m2-planet: Update to 1.8.0., guix-commits, 2021/07/26
- 01/07: gnu: mes-minimal: Remove unused variable.,
guix-commits <=