actually filter empty groups

slamdata · Jul 19, 2018 · 73cb9c4 · 73cb9c4
1 parent 52c8f08
commit 73cb9c4
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/package.json b/package.json
@@ -6,6 +6,6 @@
   },
   "dependencies": {
     "pulp": "^12.2.0",
-    "purescript": "slamdata/node-purescript#0.12"
+    "purescript": "^0.12.0"
   }
 }
diff --git a/src/MoteRunner.purs b/src/MoteRunner.purs
@@ -98,5 +98,5 @@ shouldKeep pattern = case _ of
         let
           filtered = Array.mapMaybe (shouldKeep pattern) (unPlan value)
         in
-          guard (Array.null filtered) $>
+          guard (not Array.null filtered) $>
             (Plan.Group { label, bracket, value: Plan filtered })