diff --git a/lib/Data/Config/Suckless/Syntax.hs b/lib/Data/Config/Suckless/Syntax.hs
index 3c30630..40ca1c0 100644
--- a/lib/Data/Config/Suckless/Syntax.hs
+++ b/lib/Data/Config/Suckless/Syntax.hs
@@ -113,7 +113,7 @@ data Syntax c
   = List    (Context c) [Syntax c]
   | Symbol  (Context c) Id
   | Literal (Context c) Literal
-  deriving stock (Generic)
+  deriving stock (Generic,Typeable)
 
 
 instance Eq (Syntax c) where
@@ -123,7 +123,7 @@ instance Eq (Syntax c) where
   (==) _ _ = False
 
 deriving instance (Data (Context ())) => Data (Syntax ())
--- deriving instance (Data (Context ())) => Data (Syntax ())
+deriving instance (Data (Context C)) => Data (Syntax C)
 
 instance Pretty (Syntax c) where
   pretty (Literal _ ast) = pretty ast
diff --git a/test/Data/Config/Suckless/KeyValueSpec.hs b/test/Data/Config/Suckless/KeyValueSpec.hs
index dc40a5e..be1543f 100644
--- a/test/Data/Config/Suckless/KeyValueSpec.hs
+++ b/test/Data/Config/Suckless/KeyValueSpec.hs
@@ -20,7 +20,6 @@ import qualified Data.Set as Set
 import Prettyprinter
 import Data.Aeson
 import Text.InterpolatedString.Perl6 (qc,q)
-import Control.Monad.Identity
 import Test.Hspec