From 66b44471d540fe588d4fc68906b33d590f25b4bf Mon Sep 17 00:00:00 2001 From: Smaug123 Date: Thu, 28 Dec 2023 20:10:56 +0000 Subject: [PATCH] Rename --- PureGym.App/Fullness.fs | 2 +- PureGym.App/LookupGym.fs | 2 +- PureGym.App/MemberActivity.fs | 2 +- PureGym.App/Sessions.fs | 2 +- PureGym.sln | 6 ------ PureGym/Api.fs | 2 +- 6 files changed, 5 insertions(+), 11 deletions(-) diff --git a/PureGym.App/Fullness.fs b/PureGym.App/Fullness.fs index bbe8af6..749498c 100644 --- a/PureGym.App/Fullness.fs +++ b/PureGym.App/Fullness.fs @@ -48,7 +48,7 @@ module Fullness = let run (args : FullnessArgs) = task { - let! client = Dto.make args.Creds + let! client = Api.make args.Creds let! id = GymSelector.canonicalId client args.Gym let! attendance = client.GetGymAttendance id diff --git a/PureGym.App/LookupGym.fs b/PureGym.App/LookupGym.fs index 34df497..2ca9a82 100644 --- a/PureGym.App/LookupGym.fs +++ b/PureGym.App/LookupGym.fs @@ -44,7 +44,7 @@ module LookupGym = let run (args : LookupGymArgs) = task { - let! client = Dto.make args.Creds + let! client = Api.make args.Creds let! s = client.GetGym 19 System.Console.WriteLine (string s) return 0 diff --git a/PureGym.App/MemberActivity.fs b/PureGym.App/MemberActivity.fs index f69d03e..98138e7 100644 --- a/PureGym.App/MemberActivity.fs +++ b/PureGym.App/MemberActivity.fs @@ -31,7 +31,7 @@ module MemberActivity = let run (args : MemberActivityArgs) = task { - let! client = Dto.make args.Creds + let! client = Api.make args.Creds let! activity = client.GetMemberActivity () let activity = activity.ToMemberActivity () System.Console.WriteLine (string activity) diff --git a/PureGym.App/Sessions.fs b/PureGym.App/Sessions.fs index 4a12af2..243cd14 100644 --- a/PureGym.App/Sessions.fs +++ b/PureGym.App/Sessions.fs @@ -41,7 +41,7 @@ module Sessions = let run (args : SessionsArgs) = task { - let! client = Dto.make args.Creds + let! client = Api.make args.Creds let! activity = client.GetSessions (args.FromDate, args.ToDate) System.Console.WriteLine (string activity) diff --git a/PureGym.sln b/PureGym.sln index a59e613..034b8a5 100644 --- a/PureGym.sln +++ b/PureGym.sln @@ -6,8 +6,6 @@ Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "PureGym.App", "PureGym.App\ EndProject Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "PureGym.Test", "PureGym.Test\PureGym.Test.fsproj", "{F09DF609-5F53-4BB3-BD64-DDB136CD4D2E}" EndProject -Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "WoofWare.Myriad.Plugins", "..\WoofWare.Myriad\WoofWare.Myriad.Plugins\WoofWare.Myriad.Plugins.fsproj", "{ECA6B986-ED3A-4CC0-B37E-8E928C9DB9B3}" -EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Any CPU = Debug|Any CPU @@ -26,9 +24,5 @@ Global {F09DF609-5F53-4BB3-BD64-DDB136CD4D2E}.Debug|Any CPU.Build.0 = Debug|Any CPU {F09DF609-5F53-4BB3-BD64-DDB136CD4D2E}.Release|Any CPU.ActiveCfg = Release|Any CPU {F09DF609-5F53-4BB3-BD64-DDB136CD4D2E}.Release|Any CPU.Build.0 = Release|Any CPU - {ECA6B986-ED3A-4CC0-B37E-8E928C9DB9B3}.Debug|Any CPU.ActiveCfg = Debug|Any CPU - {ECA6B986-ED3A-4CC0-B37E-8E928C9DB9B3}.Debug|Any CPU.Build.0 = Debug|Any CPU - {ECA6B986-ED3A-4CC0-B37E-8E928C9DB9B3}.Release|Any CPU.ActiveCfg = Release|Any CPU - {ECA6B986-ED3A-4CC0-B37E-8E928C9DB9B3}.Release|Any CPU.Build.0 = Release|Any CPU EndGlobalSection EndGlobal diff --git a/PureGym/Api.fs b/PureGym/Api.fs index 641c4db..8a52448 100644 --- a/PureGym/Api.fs +++ b/PureGym/Api.fs @@ -6,7 +6,7 @@ open System.Threading.Tasks /// Methods for interacting with the PureGym REST API. [] -module Dto = +module Api = /// Create a REST client, authenticated as the specified user. let make (auth : Auth) : IPureGymApi Task = task {