diff options
Diffstat (limited to 'spec/src')
-rw-r--r-- | spec/src/Thermoprint/API.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/spec/src/Thermoprint/API.hs b/spec/src/Thermoprint/API.hs index 6f7fc02..f5b7bee 100644 --- a/spec/src/Thermoprint/API.hs +++ b/spec/src/Thermoprint/API.hs | |||
@@ -43,6 +43,8 @@ import Control.Exception (Exception) | |||
43 | import Data.Time (UTCTime) | 43 | import Data.Time (UTCTime) |
44 | import Data.Time.Format | 44 | import Data.Time.Format |
45 | 45 | ||
46 | import Data.Encoding.Exception (EncodingException(..)) | ||
47 | |||
46 | instance (Integral k, Ord k, ToJSON v) => ToJSON (Map k v) where | 48 | instance (Integral k, Ord k, ToJSON v) => ToJSON (Map k v) where |
47 | toJSON = toJSON . Map.foldMapWithKey (IntMap.singleton . castId) | 49 | toJSON = toJSON . Map.foldMapWithKey (IntMap.singleton . castId) |
48 | 50 | ||