workflows

Modules.Config/ConfigManager.vb

@@ -124,7 +124,9 @@ Public Class ConfigManager(Of T)
         Dim oType As Type = GetType(T)
         Dim oExcludedAttributeTypes = IIf(IsNothing(ExcludedAttributeTypes), New List(Of Type), ExcludedAttributeTypes)
         Dim oProperties = oType.GetProperties().
-            Where(Function(p) p.CanRead And p.CanWrite).
+            Where(Function(p)
+                      Return p.CanRead And p.CanWrite
+                  End Function).
             Where(Function(p)
                       For Each oAttributeType As Type In oExcludedAttributeTypes
                           If Attribute.IsDefined(p, oAttributeType) Then