config: set .env settings in process environment if not already there

config.lisp

@@ -51,7 +51,9 @@
              (dotenv-val (if dotenv-data (gethash key dotenv-data))))
         (if env-val
           (setf (gethash sl data) env-val)
-          (setf (gethash sl data) dotenv-val))))))
+          (progn 
+            (setf (uiop:getenv key) dotenv-val)
+            (setf (gethash sl data) dotenv-val)))))))
 
 (defun root (&rest params &key (class 'root) &allow-other-keys)
   (setf *root* (apply #'make-instance class params)))

util/async.lisp

@@ -31,8 +31,7 @@
                 do (funcall handle-message tsk msg)))
         (funcall teardown tsk)
         (data tsk))
-      (setf (status tsk) :done)
-      )))
+      (setf (status tsk) :done))))
 
 ;;;; task class and related functions / methods