aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/main.lisp6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/main.lisp b/src/main.lisp
index 6dc2c7b..b0031e8 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -606,6 +606,12 @@ mentioned in th config file.
;;; ENDPOINT DEFINITIONS
+(defendpoint* :post "/snapshot" ((token an-api-token))
+ (:auth 'admin-only)
+ "Snapshot the datastore. Do this after upgrade"
+ (db:snapshot)
+ "ok")
+
(defendpoint* :get "/contributor/:who a-contributor-by-handle:" () ()
"Return a [contributor](#contributor) data object."
(to-json who))