raco setup: fix exit code on doc error
This commit is contained in:
parent
2fd6a05d46
commit
9bb5dda4f5
|
@ -1191,6 +1191,7 @@
|
||||||
(set-doc:verbose)
|
(set-doc:verbose)
|
||||||
(with-handlers ([exn:fail?
|
(with-handlers ([exn:fail?
|
||||||
(lambda (exn)
|
(lambda (exn)
|
||||||
|
(set! exit-code 1)
|
||||||
(setup-printf #f "docs failure: ~a" (exn->string exn)))])
|
(setup-printf #f "docs failure: ~a" (exn->string exn)))])
|
||||||
(define auto-start-doc?
|
(define auto-start-doc?
|
||||||
(or (and (not (null? (archives)))
|
(or (and (not (null? (archives)))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user