From 24cb66d18e37162721d636c277838718d3b23966 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 9 Jun 2018 10:21:26 +0200 Subject: ui: Avoid #:select'ing bindings introduced in the latest (guix build utils). This should allow 'guix pull' to complete even when invoked from a Guix that predates commit 5d669883ecc104403c5d3ba7d172e9c02234577c. * guix/ui.scm: Use #:hide instead of #:select. This is a followup to 5d669883ecc104403c5d3ba7d172e9c02234577c. --- guix/ui.scm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'guix/ui.scm') diff --git a/guix/ui.scm b/guix/ui.scm index 45f438fc45..99f66b0fdc 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -42,11 +42,12 @@ #:use-module ((guix build syscalls) #:select (free-disk-space terminal-columns)) #:use-module ((guix build utils) - #:select (invoke-error? invoke-error-program - invoke-error-arguments - invoke-error-exit-status - invoke-error-term-signal - invoke-error-stop-signal)) + ;; XXX: All we need are the bindings related to + ;; '&invoke-error'. However, to work around the bug described + ;; in 5d669883ecc104403c5d3ba7d172e9c02234577c, #:hide + ;; unwanted bindings instead of #:select'ing the needed + ;; bindings. + #:hide (package-name->name+version)) #:use-module (srfi srfi-1) #:use-module (srfi srfi-11) #:use-module (srfi srfi-19) -- cgit v1.2.3