From 79471c9b5c7d5bb07dc808c960ed441c9ed7faaa Mon Sep 17 00:00:00 2001 From: Teddy Wing Date: Wed, 18 May 2022 21:13:30 +0200 Subject: main: Run the real program from (main) Remove the config test and actually run the program when (main) is called. --- src/main.lisp | 12 +----------- 1 file changed, 1 insertion(+), 11 deletions(-) diff --git a/src/main.lisp b/src/main.lisp index c469e1b..d74faf6 100644 --- a/src/main.lisp +++ b/src/main.lisp @@ -7,17 +7,7 @@ ;; Continue to next page (let ((config (parse-options))) - (format t "~S" config)) - - ; (let ((config (make-instance 'config - ; :login "name@example.com" - ; :token "atlassian-token" - ; :endpoint "example.atlassian.net" - ; :email-to "name@example.com" - ; :jql "project = \"FAKE\" AND watcher != currentUser() AND key > \"FAKE-100\" ORDER BY created DESC"))) - ; - ; (run config)) - ) + (run config))) (defun run (config) (let ((basic-auth-token (cl-base64:string-to-base64-string -- cgit v1.2.3