Commit 9e05e407 authored by Justin Woo's avatar Justin Woo

allow for creating offline patch sets using checkbox control

also displays the current working patch in the table when viewing
parent 81889fb1
This diff is collapsed.
...@@ -420,6 +420,8 @@ newtype NgramsPatch = NgramsPatch ...@@ -420,6 +420,8 @@ newtype NgramsPatch = NgramsPatch
, patch_list :: Replace TermList , patch_list :: Replace TermList
} }
derive instance newtypeNgramsPatch :: Newtype NgramsPatch _
instance semigroupNgramsPatch :: Semigroup NgramsPatch where instance semigroupNgramsPatch :: Semigroup NgramsPatch where
append (NgramsPatch p) (NgramsPatch q) = NgramsPatch append (NgramsPatch p) (NgramsPatch q) = NgramsPatch
{ patch_children: p.patch_children <> q.patch_children { patch_children: p.patch_children <> q.patch_children
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment