From 13d628d008584dff9465a9fb48e4e57e74bf7643 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Fri, 18 Feb 2022 17:00:55 -0600 Subject: working on invite functions --- build-app.lisp | 2 ++ 1 file changed, 2 insertions(+) (limited to 'build-app.lisp') diff --git a/build-app.lisp b/build-app.lisp index bd51d54..c2f79ba 100644 --- a/build-app.lisp +++ b/build-app.lisp @@ -102,6 +102,8 @@ than the users." ((getopt :long-name "login") (destructuring-bind (user pass) arguments (cli::login user pass))) + ((getopt :long-name "invite") + (cli::request-invite-code)) (arguments ;; when the first argument is a number, try run a oneliner (a:when-let (hist-number (parse-integer (first arguments) :junk-allowed t)) -- cgit v1.2.3