Add Do.allowFatal.

dillonkearns · Apr 19, 2024 · 9b9a634 · 9b9a634
1 parent f58dcc6
commit 9b9a634
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 1 deletion.
diff --git a/docs.json b/docs.json
diff --git a/src/BackendTask/Do.elm b/src/BackendTask/Do.elm
@@ -1,5 +1,6 @@
 module BackendTask.Do exposing
     ( do
+    , allowFatal
     , noop
     , exec, command
     , glob, log, env
@@ -25,6 +26,7 @@ apply continuation-style formatting to your Elm code:
 You can see more discussion of continuation style in Elm in this Discourse post: <https://discourse.elm-lang.org/t/experimental-json-decoding-api/2121>.
 
 @docs do
+@docs allowFatal
 
 
 ## Defining Your Own Continuation Utilities
@@ -88,6 +90,12 @@ noop =
     BackendTask.succeed ()
 
 
+{-| -}
+allowFatal : BackendTask { error | fatal : FatalError } data -> (data -> BackendTask FatalError b) -> BackendTask FatalError b
+allowFatal =
+    do << BackendTask.allowFatal
+
+
 {-| A continuation-style helper for [`Glob.fromString`](BackendTask-Glob#fromString).
 
 In a shell script, you can think of this as a stand-in for globbing files directly within a command. The [`BackendTask.Stream.command`](BackendTask-Stream#command)