Add htmx support to bit-badger and personal
- Tweak transitions on tech-blog - Fix URL forwarding on settings save - Add newer/older posts to tech-blog single post template
This commit is contained in:
@@ -298,7 +298,7 @@ let saveSettings : HttpHandler = fun next ctx -> task {
|
||||
WebLogCache.set webLog
|
||||
|
||||
do! addMessage ctx { UserMessage.success with message = "Web log settings saved successfully" }
|
||||
return! redirectToGet (WebLog.relativeUrl webLog (Permalink "admin")) next ctx
|
||||
return! redirectToGet (WebLog.relativeUrl webLog (Permalink "admin/settings")) next ctx
|
||||
| None -> return! Error.notFound next ctx
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user