From 94122e7741c05464c39e65b0098609900fd68956 Mon Sep 17 00:00:00 2001 From: Craig Oates Date: Mon, 10 Oct 2022 20:18:00 +0100 Subject: [PATCH] tidy-up code and leave comment in /edit/archive about Meilisearch. This defroute doesn't change anything relevant in the Meilisearch DB so it doesn't need updating. I've left a comment (mostly for future me) to remind me not to think I've missed a defroute and try to integrate the Meilisearch stuff into it. --- src/web.lisp | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/src/web.lisp b/src/web.lisp index 91c7d03..a093a10 100644 --- a/src/web.lisp +++ b/src/web.lisp @@ -1309,11 +1309,13 @@ (:logged-in) ;; Authorised (cond ((utils:string-is-nil-or-empty? slug) - (utils:set-alert "Archive entry cannot be found." - "missing-data") + (utils:set-alert + "Archive entry cannot be found." "missing-data") (redirect "/user/archive")) - (t (storage:store-text "" "archive" slug page-content) + ;; Meilisearch integration not needed here because + ;; nothing has changed from the Meilisearch DB + ;; perspective. (utils:set-alert "Archive entry updated." "success") (redirect (format nil "/edit/archive/~a" slug)))) ;; Not Authorised