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 /src | |
| 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.
Diffstat (limited to 'src')
| -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  | 
