diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-07-20 00:33:50 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-07-20 01:32:17 +0200 |
| commit | 723bdb8ef0175716a2bfa93e96c3fd757d7b2679 (patch) | |
| tree | 16183f316342d34246ce8e0346c92906ae679217 /guix/ui.scm | |
| parent | a2a94b6e58e5120462d6861bdf72efa2170bfd73 (diff) | |
| download | patches-723bdb8ef0175716a2bfa93e96c3fd757d7b2679.tar patches-723bdb8ef0175716a2bfa93e96c3fd757d7b2679.tar.gz | |
ui: 'warn-about-load-error' provides hints for unbound variables.
* guix/ui.scm (warn-about-load-error): Add 'unbound-variable' clause.
* tests/guix-build.sh: Add test.
Diffstat (limited to 'guix/ui.scm')
| -rw-r--r-- | guix/ui.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index 1812b01272..7920335928 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -392,6 +392,8 @@ exiting. ARGS is the list of arguments received by the 'throw' handler." (('syntax-error proc message properties form . rest) (let ((loc (source-properties->location properties))) (warning loc (G_ "~a~%") message))) + (('unbound-variable _ ...) + (report-unbound-variable-error args)) (('srfi-34 obj) (if (message-condition? obj) (warning (G_ "failed to load '~a': ~a~%") |