Update deps

- Add .NET 8 target
- Remove ID param for Postgres doc calls

src/MyWebLog.Data/Postgres/PostgresCategoryData.fs

@@ -122,7 +122,7 @@ type PostgresCategoryData (log : ILogger) =
     /// Save a category
     let save (cat : Category) = backgroundTask {
         log.LogTrace "Category.save"
-        do! save Table.Category (CategoryId.toString cat.Id) cat
+        do! save Table.Category cat
     }
     
     /// Restore categories from a backup

src/MyWebLog.Data/Postgres/PostgresPageData.fs

@@ -145,7 +145,7 @@ type PostgresPageData (log : ILogger) =
     let save (page : Page) = backgroundTask {
         log.LogTrace "Page.save"
         let! oldPage = findFullById page.Id page.WebLogId
-        do! save Table.Page (PageId.toString page.Id) { page with Revisions = [] }
+        do! save Table.Page { page with Revisions = [] }
         do! updatePageRevisions page.Id (match oldPage with Some p -> p.Revisions | None -> []) page.Revisions
         ()
     }

src/MyWebLog.Data/Postgres/PostgresPostData.fs

@@ -175,7 +175,7 @@ type PostgresPostData (log : ILogger) =
     let save (post : Post) = backgroundTask {
         log.LogTrace "Post.save"
         let! oldPost = findFullById post.Id post.WebLogId
-        do! save Table.Post (PostId.toString post.Id) { post with Revisions = [] }
+        do! save Table.Post { post with Revisions = [] }
         do! updatePostRevisions post.Id (match oldPost with Some p -> p.Revisions | None -> []) post.Revisions
     }
     

src/MyWebLog.Data/Postgres/PostgresTagMapData.fs

@@ -46,7 +46,7 @@ type PostgresTagMapData (log : ILogger) =
     
     /// Save a tag mapping
     let save (tagMap : TagMap) =
-        save Table.TagMap (TagMapId.toString tagMap.Id) tagMap
+        save Table.TagMap tagMap
     
     /// Restore tag mappings from a backup
     let restore (tagMaps : TagMap list) = backgroundTask {

src/MyWebLog.Data/Postgres/PostgresThemeData.fs

@@ -47,7 +47,7 @@ type PostgresThemeData (log : ILogger) =
     /// Save a theme
     let save (theme : Theme) =
         log.LogTrace "Theme.save"
-        save Table.Theme (ThemeId.toString theme.Id) theme
+        save Table.Theme theme
     
     interface IThemeData with
         member _.All () = all ()

src/MyWebLog.Data/Postgres/PostgresWebLogData.fs

@@ -11,7 +11,7 @@ type PostgresWebLogData (log : ILogger) =
     /// Add a web log
     let add (webLog : WebLog) =
         log.LogTrace "WebLog.add"
-        insert Table.WebLog (WebLogId.toString webLog.Id) webLog
+        insert Table.WebLog webLog
     
     /// Retrieve all web logs
     let all () =

src/MyWebLog.Data/Postgres/PostgresWebLogUserData.fs

@@ -85,7 +85,7 @@ type PostgresWebLogUserData (log : ILogger) =
     /// Save a user
     let save (user : WebLogUser) =
         log.LogTrace "WebLogUser.save"
-        save Table.WebLogUser (WebLogUserId.toString user.Id) user
+        save Table.WebLogUser user
     
     interface IWebLogUserData with
         member _.Add user = save user