diff options
author | Teddy Wing | 2022-05-18 21:13:30 +0200 |
---|---|---|
committer | Teddy Wing | 2022-05-18 21:13:30 +0200 |
commit | 79471c9b5c7d5bb07dc808c960ed441c9ed7faaa (patch) | |
tree | d69e0c42a9efe91faa16106ff522c4ecbf3d2373 | |
parent | 552183c8d9c151eee65c518df65c1a2a77beed54 (diff) | |
download | wajir-79471c9b5c7d5bb07dc808c960ed441c9ed7faaa.tar.bz2 |
main: Run the real program from (main)
Remove the config test and actually run the program when (main) is
called.
-rw-r--r-- | src/main.lisp | 12 |
1 files changed, 1 insertions, 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 |