Revert "don't use #:logger argument"

This reverts commit 42bccf3e50.
candidate-v2.0
Matthew Butterick 5 years ago
parent 42bccf3e50
commit 4bf80ef26d

@ -27,7 +27,6 @@
(very-nice-path (car args)))))
(define (dispatch command-name)
(parameterize ([current-logger pollen-logger])
(with-logging-to-port
(current-error-port)
(λ ()
@ -42,8 +41,9 @@
[("setup") (handle-setup (get-first-arg-or-current-dir))]
[("clone" "publish") (handle-publish)]
[else (handle-unknown command-name)]))
#:logger pollen-logger
'info
'pollen)))
'pollen))
(define (very-nice-path x)
(path->complete-path (simplify-path (cleanse-path (->path x)))))

Loading…
Cancel
Save