Skip to content

Commit 2353807

Browse files
authored
Merge pull request #308 from iphydf/patch-2
Add "behind" mergeable_state.
2 parents 5b6b4e8 + ee04b14 commit 2353807

File tree

1 file changed

+3
-0
lines changed

1 file changed

+3
-0
lines changed

src/GitHub/Data/Options.hs

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -96,6 +96,7 @@ data MergeableState
9696
| StateDirty
9797
| StateUnstable
9898
| StateBlocked
99+
| StateBehind
99100
deriving
100101
(Eq, Ord, Show, Enum, Bounded, Generic, Typeable, Data)
101102

@@ -105,13 +106,15 @@ instance ToJSON MergeableState where
105106
toJSON StateDirty = String "dirty"
106107
toJSON StateUnstable = String "unstable"
107108
toJSON StateBlocked = String "blocked"
109+
toJSON StateBehind = String "behind"
108110

109111
instance FromJSON MergeableState where
110112
parseJSON (String "unknown") = pure StateUnknown
111113
parseJSON (String "clean") = pure StateClean
112114
parseJSON (String "dirty") = pure StateDirty
113115
parseJSON (String "unstable") = pure StateUnstable
114116
parseJSON (String "blocked") = pure StateBlocked
117+
parseJSON (String "behind") = pure StateBehind
115118
parseJSON v = typeMismatch "MergeableState" v
116119

117120
instance NFData MergeableState where rnf = genericRnf

0 commit comments

Comments
 (0)