From f75243e17e3ff88582314bcb8450e654bb0b556b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Thu, 9 Jan 2020 11:21:31 +0100 Subject: channels: Provide a hint when the 'guix' channel is lacking. Fixes . Reported by Jesse Gibbons . * guix/channels.scm (channel-instance-derivations): Raise '&fix-hint' condition in addition to the '&message' condition. --- guix/channels.scm | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'guix/channels.scm') diff --git a/guix/channels.scm b/guix/channels.scm index 826ee729ad..f0261dc2da 100644 --- a/guix/channels.scm +++ b/guix/channels.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2018, 2019 Ludovic Courtès +;;; Copyright © 2018, 2019, 2020 Ludovic Courtès ;;; Copyright © 2018 Ricardo Wurmus ;;; Copyright © 2019 Jan (janneke) Nieuwenhuizen ;;; @@ -36,7 +36,8 @@ #:use-module (guix i18n) #:use-module ((guix utils) #:select (source-properties->location - &error-location)) + &error-location + &fix-hint)) #:use-module (srfi srfi-1) #:use-module (srfi srfi-2) #:use-module (srfi srfi-9) @@ -457,6 +458,9 @@ INSTANCES." (raise (apply make-compound-condition (condition (&message (message "'guix' channel is lacking"))) + (condition + (&fix-hint (hint (G_ "Make sure your list of channels +contains one channel named @code{guix} providing the core of Guix.")))) (if loc (list (condition (&error-location (location loc)))) '()))))) -- cgit v1.2.3