Unwrap trigger-guarded behavior when printing quit notifications
This commit is contained in:
parent
b2eef0c54a
commit
bc3e5be900
|
@ -147,7 +147,9 @@
|
||||||
(with-color BRIGHT-RED
|
(with-color BRIGHT-RED
|
||||||
(output "~a ~v exited (~a total processes now)\n"
|
(output "~a ~v exited (~a total processes now)\n"
|
||||||
pidstr
|
pidstr
|
||||||
behavior
|
(if (trigger-guard? state)
|
||||||
|
(trigger-guard-handler state)
|
||||||
|
behavior)
|
||||||
newcount))
|
newcount))
|
||||||
(unless (boring-state? state)
|
(unless (boring-state? state)
|
||||||
(output "~a's final state:\n" pidstr)
|
(output "~a's final state:\n" pidstr)
|
||||||
|
|
Loading…
Reference in New Issue