Use updated WoofWare plugins

This commit is contained in:
Smaug123
2023-12-28 19:54:08 +00:00
parent 6fb9e6e591
commit d7b078e8d6
8 changed files with 259 additions and 58 deletions

View File

@@ -17,8 +17,8 @@ type SessionsArgsFragment =
type SessionsArgs =
{
Creds : Auth
FromDate : DateTime
ToDate : DateTime
FromDate : DateOnly
ToDate : DateOnly
}
static member Parse
@@ -31,8 +31,8 @@ type SessionsArgs =
{
Creds = auth
FromDate = DateTime.Parse fromDate
ToDate = DateTime.Parse toDate
FromDate = DateOnly.Parse fromDate
ToDate = DateOnly.Parse toDate
}
|> Ok
@@ -42,7 +42,7 @@ module Sessions =
let run (args : SessionsArgs) =
task {
let! client = Dto.make args.Creds
let! activity = client.GetSessions args.FromDate args.ToDate
let! activity = client.GetSessions (args.FromDate, args.ToDate)
System.Console.WriteLine (string<Sessions> activity)
return 0