git.iko.soy/typeable/bloodhound
on master help sign in
More missing plugin fields
commitcc68a5a69fe5b844a4e8e53dc53f4906cd8c3b01 authorJosh Berman <berman.josh@gmail.com> dateThu 1 Dec 2016, 15:36 (10 years ago) parentca25c0d
1 file changed+7−7
src/Database/Bloodhound/Types.hs+7−7
src/Database/Bloodhound/Types.hs+7−7
@@ -3955,9 +3955,9 @@ data NodeInfo = NodeInfo {
39553955 } deriving (Eq, Show, Generic, Typeable)
39563956
39573957data NodePluginInfo = NodePluginInfo {
3958− nodePluginSite :: Bool
3958+ nodePluginSite :: Maybe Bool
39593959 -- ^ Is this a site plugin?
3960− , nodePluginJVM :: Bool
3960+ , nodePluginJVM :: Maybe Bool
39613961 -- ^ Is this plugin running on the JVM
39623962 , nodePluginDescription :: Text
39633963 , nodePluginVersion :: MaybeNA VersionNumber
@@ -4803,11 +4803,11 @@ parseNodeInfo nid o =
48034803instance FromJSON NodePluginInfo where
48044804 parseJSON = withObject "NodePluginInfo" parse
48054805 where
4806− parse o = NodePluginInfo <$> o .: "site"
4807− <*> o .: "jvm"
4808− <*> o .: "description"
4809− <*> o .: "version"
4810− <*> o .: "name"
4806+ parse o = NodePluginInfo <$> o .:? "site"
4807+ <*> o .:? "jvm"
4808+ <*> o .: "description"
4809+ <*> o .: "version"
4810+ <*> o .: "name"
48114811
48124812instance FromJSON NodeHTTPInfo where
48134813 parseJSON = withObject "NodeHTTPInfo" parse