amr/passepartout
1
0
Fork 0
Code Issues 15 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fix: system-config.org paren balance (missing defun close)

Browse Source
This commit is contained in:
Amr Gharbeia
2026-05-04 11:44:31 -04:00
parent abfb7e5cf8
commit eb99847ccd
2 changed files with 8 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/system-config.lisp
View File

@@ -148,9 +148,9 @@
(if (> (length key) 0) (if (> (length key) 0)
(progn (config-set env-key key) (progn (config-set env-key key)
(format t "✓ ~a API key saved~%" chosen)) (format t "✓ ~a API key saved~%" chosen))
(format t "Skipping ~a — no key entered.~%" chosen)))))))) (format t "Skipping ~a — no key entered.~%" chosen))))))))
(format t "~%")) (format t "~%")))
(defun setup-add-provider () (defun setup-add-provider ()
"Entry point for adding a single provider (called from CLI)." "Entry point for adding a single provider (called from CLI)."

8
org/system-config.org
View File

@@ -225,9 +225,11 @@ These are shown inline when the user runs the setup wizard, so they know what th
(if (> (length key) 0) (if (> (length key) 0)
(progn (config-set env-key key) (progn (config-set env-key key)
(format t "✓ ~a API key saved~%" chosen)) (format t "✓ ~a API key saved~%" chosen))
(format t "Skipping ~a — no key entered.~%" chosen)))))))) (format t "Skipping ~a — no key entered.~%" chosen))))))))
(format t "~%")) (format t "~%")))
#+end_src #+end_src