Skip to content

Commit 143201e

Browse files
authored
Merge pull request #146 from epost/master
Remove obsolete ResponseFormatError
2 parents 200bad7 + 174a10e commit 143201e

File tree

1 file changed

+0
-11
lines changed

1 file changed

+0
-11
lines changed

src/Affjax/ResponseFormat.purs

Lines changed: 0 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -7,8 +7,6 @@ import Data.ArrayBuffer.Types (ArrayBuffer)
77
import Data.Maybe (Maybe(..))
88
import Data.MediaType (MediaType)
99
import Data.MediaType.Common (applicationJSON)
10-
import Foreign (Foreign, ForeignError)
11-
import Foreign as Foreign
1210
import Web.DOM.Document (Document)
1311
import Web.File.Blob (Blob)
1412

@@ -56,12 +54,3 @@ toMediaType =
5654
case _ of
5755
Json _ -> Just applicationJSON
5856
_ -> 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

0 commit comments

Comments
 (0)