Tweak admin theme changes

- Fix SQLite posts-by-tag query - Fix "on disk" check for default theme
2024-01-20 17:58:24 -05:00
parent 5ce84e18ca
commit d1a9606c5c
5 changed files with 24 additions and 10 deletions
--- a/src/MyWebLog.Data/SQLite/SQLitePostData.fs
+++ b/src/MyWebLog.Data/SQLite/SQLitePostData.fs
@@ -145,7 +145,7 @@ type SQLitePostData(conn: SqliteConnection, log: ILogger) =
        let tagSql, tagParams = inJsonArray Table.Post (nameof Post.Empty.Tags) "tag" [ tag ]
        conn.customList
            $"{publishedPostByWebLog} AND {tagSql}
-               ORDER BY p.published_on DESC
+               ORDER BY {publishField} DESC
               LIMIT {postsPerPage + 1} OFFSET {(pageNbr - 1) * postsPerPage}"
            (webLogParam webLogId :: tagParams)
            fromData<Post>