File tree Expand file tree Collapse file tree 1 file changed +0
-11
lines changed Expand file tree Collapse file tree 1 file changed +0
-11
lines changed Original file line number Diff line number Diff line change @@ -7,8 +7,6 @@ import Data.ArrayBuffer.Types (ArrayBuffer)
7
7
import Data.Maybe (Maybe (..))
8
8
import Data.MediaType (MediaType )
9
9
import Data.MediaType.Common (applicationJSON )
10
- import Foreign (Foreign , ForeignError )
11
- import Foreign as Foreign
12
10
import Web.DOM.Document (Document )
13
11
import Web.File.Blob (Blob )
14
12
@@ -56,12 +54,3 @@ toMediaType =
56
54
case _ of
57
55
Json _ -> Just applicationJSON
58
56
_ -> Nothing
59
-
60
- -- | Used when an error occurs when attempting to decode into a particular
61
- -- | response format. The error that occurred when decoding is included, along
62
- -- | with the value that decoding was attempted on.
63
- data ResponseFormatError = ResponseFormatError ForeignError Foreign
64
-
65
- printResponseFormatError :: ResponseFormatError → String
66
- printResponseFormatError (ResponseFormatError err _) =
67
- Foreign .renderForeignError err
You can’t perform that action at this time.
0 commit comments