Invalidate cache when theme uploaded (#12)

- Add episode to display page (leftover from #9) - Show episode label based on structure (also #9)
2022-06-27 22:16:53 -04:00
parent 16603bbcaf
commit 7203fa5a38
5 changed files with 12 additions and 7 deletions
--- a/src/MyWebLog/Handlers/Admin.fs
+++ b/src/MyWebLog/Handlers/Admin.fs
@@ -440,6 +440,7 @@ let updateTheme : HttpHandler = fun next ctx -> task {
            do! themeFile.CopyToAsync stream
            do! loadThemeFromZip themeName stream true data
            do! ThemeAssetCache.refreshTheme (ThemeId themeName) data
+            TemplateCache.invalidateTheme themeName
            do! addMessage ctx { UserMessage.success with message = "Theme updated successfully" }
            return! redirectToGet (WebLog.relativeUrl ctx.WebLog (Permalink "admin/dashboard")) next ctx
        | Ok _ ->