diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-01-22 14:50:43 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-01-22 14:50:43 +0100 |
| commit | 0d3225a08b114713f92796d1595e987752f4ec00 (patch) | |
| tree | 04d7ea2f5d2bf2eb8401a1938b1106dfeb7300c8 /src | |
| parent | 47cd2d74700ac8d4df493d3a0907140a49450e10 (diff) | |
| download | cuirass-0d3225a08b114713f92796d1595e987752f4ec00.tar cuirass-0d3225a08b114713f92796d1595e987752f4ec00.tar.gz | |
Improve build event logging.
* src/cuirass/base.scm (handle-build-event): Add 'build-failed'; shorten
message for 'build-remote'.
Diffstat (limited to 'src')
| -rw-r--r-- | src/cuirass/base.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm index 7aa4dd4..7aeb210 100644 --- a/src/cuirass/base.scm +++ b/src/cuirass/base.scm @@ -253,9 +253,11 @@ and so on. " (('build-started drv _ ...) (log-message "build started: '~a'" drv)) (('build-remote drv host _ ...) - (log-message "build of '~a' offloaded to '~a'" drv host)) + (log-message "'~a' offloaded to '~a'" drv host)) (('build-succeeded drv _ ...) (log-message "build succeeded: '~a'" drv)) + (('build-failed drv _ ...) + (log-message "build failed: '~a'" drv)) (('substituter-started item _ ...) (log-message "substituter started: '~a'" item)) (('substituter-succeeded item _ ...) |