Fix range support matching for products with children

Fleex255 · Jun 25, 2021 · a8a5bf9 · a8a5bf9
1 parent e961160
commit a8a5bf9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/PolicyPlus/PolicyProcessing.vb b/PolicyPlus/PolicyProcessing.vb
@@ -391,7 +391,7 @@
                                   Dim subproduct = SupportEntry.Product.Children.FirstOrDefault(Function(p) p.RawProduct.Version = version)
                                   If subproduct Is Nothing Then Continue For
                                   If Products.Contains(subproduct) Then Return True
-                                  If subproduct.Children IsNot Nothing Then Return subproduct.Children.Any(Function(p) Products.Contains(p))
+                                  If subproduct.Children IsNot Nothing AndAlso subproduct.Children.Any(Function(p) Products.Contains(p)) Then Return True
                               Next
                               Return False
                           End Function