aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTeddy Wing2022-05-18 21:13:30 +0200
committerTeddy Wing2022-05-18 21:13:30 +0200
commit79471c9b5c7d5bb07dc808c960ed441c9ed7faaa (patch)
treed69e0c42a9efe91faa16106ff522c4ecbf3d2373
parent552183c8d9c151eee65c518df65c1a2a77beed54 (diff)
downloadwajir-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.lisp12
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