From 33869e26481060ec7d5fa65ab1c7e67d96de2a8c Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Sun, 14 Feb 2016 23:18:42 +0000 Subject: Fixed build & minor code cleanup --- spec/src/Thermoprint/API.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'spec/src/Thermoprint/API.hs') 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) import Data.Time (UTCTime) import Data.Time.Format +import Data.Encoding.Exception (EncodingException(..)) + instance (Integral k, Ord k, ToJSON v) => ToJSON (Map k v) where toJSON = toJSON . Map.foldMapWithKey (IntMap.singleton . castId) -- cgit v1.2.3