Supply-factories.pm6

diff --git a/src/core.c/Supply-factories.pm6 b/src/core.c/Supply-factories.pm6
index 775cf694e..d77d18642 100644
--- a/src/core.c/Supply-factories.pm6
+++ b/src/core.c/Supply-factories.pm6
@@ -211,9 +211,10 @@
                     tap($t);
                 },
                 -> \value {
-                    my \result = try &!mapper(value);
-                    if $! {
-                        quit($!);
+                    my $error;
+                    my \result = try { CATCH { default { $error = $_ } }; &!mapper(value) };
+                    if $error {
+                        quit($error);
                         self!cleanup($cleaned-up, $source-tap);
                     }
                     else {