aboutsummaryrefslogtreecommitdiff
path: root/spec/src/Thermoprint/API.hs
diff options
context:
space:
mode:
Diffstat (limited to 'spec/src/Thermoprint/API.hs')
-rw-r--r--spec/src/Thermoprint/API.hs2
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)
43import Data.Time (UTCTime) 43import Data.Time (UTCTime)
44import Data.Time.Format 44import Data.Time.Format
45 45
46import Data.Encoding.Exception (EncodingException(..))
47
46instance (Integral k, Ord k, ToJSON v) => ToJSON (Map k v) where 48instance (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