Fix RethinkDB restore (#10)

- Also fixed replacement base URL issue
This commit is contained in:
2022-06-24 08:47:22 -04:00
parent fde06a2e27
commit dfb0ff3b9c
4 changed files with 40 additions and 19 deletions

View File

@@ -275,7 +275,7 @@ module Backup =
match! data.WebLog.findById archive.webLog.id with
| Some webLog when defaultArg newUrlBase webLog.urlBase = webLog.urlBase ->
do! data.WebLog.delete webLog.id
return archive
return { archive with webLog = { archive.webLog with urlBase = defaultArg newUrlBase webLog.urlBase } }
| Some _ ->
// Err'body gets new IDs...
let newWebLogId = WebLogId.create ()

View File

@@ -10,7 +10,7 @@
</PropertyGroup>
<ItemGroup>
<Content Include="appsettings.json" CopyToOutputDirectory="Always" />
<Content Include="appsettings*.json" CopyToOutputDirectory="Always" />
<Compile Include="Caches.fs" />
<Compile Include="Handlers\Error.fs" />
<Compile Include="Handlers\Helpers.fs" />