diff options
Diffstat (limited to 'src/app/api.clj')
-rw-r--r-- | src/app/api.clj | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/app/api.clj b/src/app/api.clj index 27ed9a4..432482c 100644 --- a/src/app/api.clj +++ b/src/app/api.clj @@ -24,3 +24,8 @@ assoc-in [(first (.split token "-")) :scores problem] :solved))) + +(defrpc admin-eval! [token expr] + {:rpc/pre (= token (db/get :admin))} + (binding [*ns* (find-ns 'simpledb.core)] + (eval (read-string expr)))) |