Revert a bit
This commit is contained in:
@@ -51,7 +51,6 @@ module Fullness =
|
|||||||
let! client = Dto.make args.Creds
|
let! client = Dto.make args.Creds
|
||||||
let! id = GymSelector.canonicalId client args.Gym
|
let! id = GymSelector.canonicalId client args.Gym
|
||||||
let! attendance = client.GetGymAttendance id
|
let! attendance = client.GetGymAttendance id
|
||||||
let attendance = failwith ""
|
|
||||||
|
|
||||||
if args.Terse then
|
if args.Terse then
|
||||||
System.Console.WriteLine attendance.TotalPeopleInGym
|
System.Console.WriteLine attendance.TotalPeopleInGym
|
||||||
|
@@ -33,6 +33,7 @@ module MemberActivity =
|
|||||||
task {
|
task {
|
||||||
let! client = Dto.make args.Creds
|
let! client = Dto.make args.Creds
|
||||||
let! activity = client.GetMemberActivity ()
|
let! activity = client.GetMemberActivity ()
|
||||||
|
let activity = activity.ToMemberActivity ()
|
||||||
System.Console.WriteLine (string<MemberActivityThisMonth> activity)
|
System.Console.WriteLine (string<MemberActivityThisMonth> activity)
|
||||||
return 0
|
return 0
|
||||||
}
|
}
|
||||||
|
@@ -26,7 +26,7 @@ type IPureGymApi =
|
|||||||
|
|
||||||
/// Get information about the activities logged against the currently authenticated PureGym human.
|
/// Get information about the activities logged against the currently authenticated PureGym human.
|
||||||
[<Get "v1/member/activity">]
|
[<Get "v1/member/activity">]
|
||||||
abstract GetMemberActivity : unit -> Task<MemberActivityThisMonth>
|
abstract GetMemberActivity : unit -> Task<MemberActivityDto>
|
||||||
|
|
||||||
/// Get information about the individual visits to all PureGyms the currently-authenticated PureGym human has made.
|
/// Get information about the individual visits to all PureGyms the currently-authenticated PureGym human has made.
|
||||||
[<Get "v2/gymSessions/member">]
|
[<Get "v2/gymSessions/member">]
|
||||||
|
@@ -3,6 +3,7 @@ namespace PureGym
|
|||||||
open System
|
open System
|
||||||
open System.Text.Json.Serialization
|
open System.Text.Json.Serialization
|
||||||
|
|
||||||
|
/// Describes the opening hours of a given gym.
|
||||||
[<WoofWare.Myriad.Plugins.JsonParse>]
|
[<WoofWare.Myriad.Plugins.JsonParse>]
|
||||||
type GymOpeningHours =
|
type GymOpeningHours =
|
||||||
{
|
{
|
||||||
|
@@ -155,8 +155,8 @@ PureGym.IPureGymApi.GetGym [method]: int -> PureGym.Gym System.Threading.Tasks.T
|
|||||||
PureGym.IPureGymApi.GetGymAttendance [method]: int -> PureGym.GymAttendance System.Threading.Tasks.Task
|
PureGym.IPureGymApi.GetGymAttendance [method]: int -> PureGym.GymAttendance System.Threading.Tasks.Task
|
||||||
PureGym.IPureGymApi.GetGyms [method]: unit -> PureGym.Gym list System.Threading.Tasks.Task
|
PureGym.IPureGymApi.GetGyms [method]: unit -> PureGym.Gym list System.Threading.Tasks.Task
|
||||||
PureGym.IPureGymApi.GetMember [method]: unit -> PureGym.Member System.Threading.Tasks.Task
|
PureGym.IPureGymApi.GetMember [method]: unit -> PureGym.Member System.Threading.Tasks.Task
|
||||||
PureGym.IPureGymApi.GetMemberActivity [method]: unit -> string System.Threading.Tasks.Task
|
PureGym.IPureGymApi.GetMemberActivity [method]: unit -> PureGym.MemberActivityDto System.Threading.Tasks.Task
|
||||||
PureGym.IPureGymApi.GetSessions [method]: System.DateTime -> System.DateTime -> string System.Threading.Tasks.Task
|
PureGym.IPureGymApi.GetSessions [method]: System.DateTime -> System.DateTime -> PureGym.Sessions System.Threading.Tasks.Task
|
||||||
PureGym.Member inherit obj, implements PureGym.Member System.IEquatable, System.Collections.IStructuralEquatable, PureGym.Member System.IComparable, System.IComparable, System.Collections.IStructuralComparable
|
PureGym.Member inherit obj, implements PureGym.Member System.IEquatable, System.Collections.IStructuralEquatable, PureGym.Member System.IComparable, System.IComparable, System.Collections.IStructuralComparable
|
||||||
PureGym.Member..ctor [constructor]: (int, string, string, string, int, string, string, string, System.DateOnly, string, string, string, int, int, int)
|
PureGym.Member..ctor [constructor]: (int, string, string, string, int, string, string, string, System.DateOnly, string, string, string, int, int, int)
|
||||||
PureGym.Member.CompoundMemberId [property]: [read-only] string
|
PureGym.Member.CompoundMemberId [property]: [read-only] string
|
||||||
|
Reference in New Issue
Block a user