add test connection handler to wenifluxos

WeniFluxos/WeniFluxos.pq

@@ -17,6 +17,13 @@ MaxAttempts = 3;
 
 AttemptTimeMultiplier = 5;
 
+shared WeniFluxos.ConnectionTest = () =>
+    let
+        source = Web.Contents(BaseUrl),
+        res = Xml.Document(source)
+    in
+        res;
+
 [DataSource.Kind="WeniFluxos", Publish="WeniFluxos.Publish"]
 shared WeniFluxos.Contents = (token as text, optional after as datetime, optional before as datetime) => WeniFluxosNavTable(BaseUrl, token, after, before) as table;
 
@@ -137,6 +144,7 @@ TryRequest = (url as text, reqOptions as record, tryCount as number, isRetry as
 GetNextLink = (response) as nullable text => Record.FieldOrDefault(response, "next");
 
 WeniFluxos = [
+    TestConnection = (dataSourcePath) => { "WeniFluxos.ConnectionTest" },
     Authentication = [
         Implicit = []
     ],