From 5c4e0c1ccd2ab8cdd2ddd49539db36a4b27231b6 Mon Sep 17 00:00:00 2001
From: Joshua Clayton <joshua.clayton@gmail.com>
Date: Sat, 4 Jun 2016 08:11:47 -0400
Subject: [PATCH] Allow allowedTerms and autoLowLikelihood to be optional
 configs

---
 src/Unused/ResultsClassifier/Types.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Unused/ResultsClassifier/Types.hs b/src/Unused/ResultsClassifier/Types.hs
index 0ccc26b..cf673ef 100644
--- a/src/Unused/ResultsClassifier/Types.hs
+++ b/src/Unused/ResultsClassifier/Types.hs
@@ -41,8 +41,8 @@ data Matcher = Term Position String | Path Position String | AppOccurrences Int
 instance FromJSON LanguageConfiguration where
     parseJSON (Y.Object o) = LanguageConfiguration
         <$> o .: "name"
-        <*> o .: "allowedTerms"
-        <*> o .: "autoLowLikelihood"
+        <*> o .:? "allowedTerms" .!= []
+        <*> o .:? "autoLowLikelihood" .!= []
         <*> o .:? "aliases" .!= []
     parseJSON _ = mzero