aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/control/exception.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/control/exception.lux')
-rw-r--r--stdlib/source/library/lux/control/exception.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/library/lux/control/exception.lux b/stdlib/source/library/lux/control/exception.lux
index 6b2ea833e..f311fdb25 100644
--- a/stdlib/source/library/lux/control/exception.lux
+++ b/stdlib/source/library/lux/control/exception.lux
@@ -103,8 +103,8 @@
(let [(, g!descriptor) (, (code.text descriptor))]
[..#label (, g!descriptor)
..#constructor (function ((, g!self) [(,* (list#each (the |input|.#binding) inputs))])
- ((,! text#composite) (, g!descriptor)
- (, (maybe.else (' "") body))))])))))))))
+ (at text.monoid (,' composite) (, g!descriptor)
+ (, (maybe.else (' "") body))))])))))))))
(def .public (report entries)
(-> (List [Text Text]) Text)