diff options
Diffstat (limited to 'stdlib/source/program/aedifex/repository/remote.lux')
-rw-r--r-- | stdlib/source/program/aedifex/repository/remote.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/program/aedifex/repository/remote.lux b/stdlib/source/program/aedifex/repository/remote.lux index 118085389..76363c94f 100644 --- a/stdlib/source/program/aedifex/repository/remote.lux +++ b/stdlib/source/program/aedifex/repository/remote.lux @@ -73,7 +73,7 @@ _ (do ! [_ ((get@ #@http.body message) (#.Some 0))] - (\ io.monad wrap (exception.throw ..download_failure [(format address uri) status])))))) + (\ io.monad in (exception.except ..download_failure [(format address uri) status])))))) (def: (upload uri content) (do (try.with io.monad) @@ -91,8 +91,8 @@ _ ((get@ #@http.body message) (#.Some 0))] (case status (^ (static http/status.created)) - (wrap []) + (in []) _ - (\ io.monad wrap (exception.throw ..upload_failure [(format address uri) status]))))) + (\ io.monad in (exception.except ..upload_failure [(format address uri) status]))))) ) |