Fix announcement send problem (#40)
This commit is contained in:
parent
6b1a5e31b5
commit
58519f9a4d
@ -1,9 +1,9 @@
|
||||
<Project>
|
||||
<PropertyGroup>
|
||||
<AssemblyVersion>7.6.0.0</AssemblyVersion>
|
||||
<FileVersion>7.6.0.0</FileVersion>
|
||||
<AssemblyVersion>7.6.1.0</AssemblyVersion>
|
||||
<FileVersion>7.6.1.0</FileVersion>
|
||||
<Authors>danieljsummers</Authors>
|
||||
<Company>Bit Badger Solutions</Company>
|
||||
<Version>7.6.0</Version>
|
||||
<Version>7.6.1</Version>
|
||||
</PropertyGroup>
|
||||
</Project>
|
||||
|
@ -336,15 +336,8 @@ type AppDbContext with
|
||||
/// Get all PrayerTracker users as members (used to send e-mails)
|
||||
member this.AllUsersAsMembers () =
|
||||
task {
|
||||
let q =
|
||||
query {
|
||||
for usr in this.Users.AsNoTracking () do
|
||||
sortBy usr.lastName
|
||||
thenBy usr.firstName
|
||||
select { Member.empty with email = usr.emailAddress; memberName = usr.fullName }
|
||||
}
|
||||
let! usrs = q.ToListAsync ()
|
||||
return List.ofSeq usrs
|
||||
let! users = this.AllUsers ()
|
||||
return users |> List.map (fun u -> { Member.empty with email = u.emailAddress; memberName = u.fullName })
|
||||
}
|
||||
|
||||
/// Find a user based on their credentials
|
||||
|
@ -1,7 +1,7 @@
|
||||
|
||||
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||
# Visual Studio Version 16
|
||||
VisualStudioVersion = 16.0.29411.108
|
||||
# Visual Studio Version 17
|
||||
VisualStudioVersion = 17.2.32630.192
|
||||
MinimumVisualStudioVersion = 10.0.40219.1
|
||||
Project("{6EC3EE1D-3C4E-46DD-8F32-0CC8E7565705}") = "PrayerTracker", "PrayerTracker\PrayerTracker.fsproj", "{63780D3F-D811-4BFB-9FB0-C28A83CCE28F}"
|
||||
EndProject
|
||||
@ -14,7 +14,7 @@ EndProject
|
||||
Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{B290BA27-C8B8-44F3-BF01-D103302D815F}"
|
||||
ProjectSection(SolutionItems) = preProject
|
||||
Directory.Build.props = Directory.Build.props
|
||||
global.json = global.json
|
||||
Publish-App.ps1 = Publish-App.ps1
|
||||
EndProjectSection
|
||||
EndProject
|
||||
Global
|
||||
|
@ -1,3 +1,3 @@
|
||||
Set-Location PrayerTracker
|
||||
dotnet publish -c Release -r linux-x64 -p:PublishSingleFile=true --self-contained false
|
||||
Set-Location bin\Release\net5.0\linux-x64\publish
|
||||
Set-Location bin\Release\net6.0\linux-x64\publish
|
Loading…
Reference in New Issue
Block a user