From d9adbe87836928168a384fc947a81a5e8e67e3aa Mon Sep 17 00:00:00 2001 From: Rick Winfrey Date: Tue, 1 Nov 2016 09:51:54 -0500 Subject: [PATCH] Simplify JSONMetaRepo fields --- test/JSONTestCase.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/test/JSONTestCase.hs b/test/JSONTestCase.hs index a64a7d0d0..f65ac2635 100644 --- a/test/JSONTestCase.hs +++ b/test/JSONTestCase.hs @@ -8,10 +8,8 @@ import Data.HashMap.Strict as HM import Prelude import Prologue -data JSONMetaRepo = JSONMetaRepo { repoPath :: !String - , repoUrl :: !String +data JSONMetaRepo = JSONMetaRepo { repoUrl :: !String , language :: !String - , testCaseDirName :: !String , fileExt :: !String , syntaxes :: ![JSONMetaSyntax] } deriving (Show, Generic, FromJSON)