Treat null values as falsey in inverted sections

CHANGELOG.md

@@ -1,5 +1,9 @@
 # Mustache library changelog
 
+## v2.4.1
+
+- Also treat Null as falsey in inverted sections
+
 ## v2.4.0
 
 - Support for aeson 2

package.yaml

@@ -1,5 +1,5 @@
 name: mustache
-version: '2.4.0'
+version: '2.4.1'
 synopsis: A mustache template parser library.
 description: ! 'Allows parsing and rendering template files with mustache markup.
   See the

src/Text/Mustache/Render.hs

@@ -154,6 +154,7 @@ substituteNode (InvertedSection (NamedData secName) invSecSTree) =
   search secName >>= \case
     Just (Bool False) -> contents
     Just (Array a)    | V.null a -> contents
+    Just Null         -> contents
     Nothing           -> contents
     _                 -> return ()
   where

test/unit/Spec.hs

@@ -161,6 +161,12 @@ substituteSpec =
           ])
       `shouldBe` "var1var2"
 
+    it "substitutes an inverse section when the key is present (and null)" $
+      substitute
+        (toTemplate [InvertedSection (NamedData ["section"]) [TextBlock "t"]])
+        (object ["section" ~> Null])
+      `shouldBe` "t"
+
     it "does not substitute a section when the key is not present" $
       substitute
         (toTemplate [Section (NamedData ["section"]) [TextBlock "t"]])