From f9a8dd053c4e0fd1fc4b64291bb90de36520b3bc Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Fri, 24 Jul 2020 23:28:11 +0200
Subject: utils: Move '&fix-hint' to (guix diagnostics).

* guix/utils.scm (&fix-hint): Move to...
* guix/diagnostics.scm (&fix-hint): ... here.
* gnu.scm: Adjust imports accordingly.
* gnu/system/mapped-devices.scm: Likewise.
* guix/channels.scm: Likewise.
* guix/profiles.scm: Likewise.
* guix/scripts/system/reconfigure.scm: Likewise.
* guix/ssh.scm: Likewise.
---
 guix/diagnostics.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'guix/diagnostics.scm')

diff --git a/guix/diagnostics.scm b/guix/diagnostics.scm
index 8b24b1b994..3096d384d8 100644
--- a/guix/diagnostics.scm
+++ b/guix/diagnostics.scm
@@ -43,6 +43,10 @@
             error-location?
             error-location
 
+            &fix-hint
+            fix-hint?
+            condition-fix-hint
+
             guix-warning-port
             program-name))
 
@@ -225,6 +229,10 @@ a location object."
   error-location?
   (location  error-location))                     ;<location>
 
+(define-condition-type &fix-hint &condition
+  fix-hint?
+  (hint condition-fix-hint))                      ;string
+
 
 (define guix-warning-port
   (make-parameter (current-warning-port)))
-- 
cgit v1.2.3