aboutsummaryrefslogtreecommitdiff
path: root/guix/diagnostics.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-07-24 23:28:11 +0200
committerLudovic Courtès <ludo@gnu.org>2020-07-25 19:11:36 +0200
commitf9a8dd053c4e0fd1fc4b64291bb90de36520b3bc (patch)
tree8543692db00f8e9380274056b047e9662267eb20 /guix/diagnostics.scm
parent6a79eed920fd4914b162461553a8d7e8f5eee324 (diff)
downloadguix-f9a8dd053c4e0fd1fc4b64291bb90de36520b3bc.tar
guix-f9a8dd053c4e0fd1fc4b64291bb90de36520b3bc.tar.gz
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.
Diffstat (limited to 'guix/diagnostics.scm')
-rw-r--r--guix/diagnostics.scm8
1 files changed, 8 insertions, 0 deletions
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)))