(def ensure-srvdirs ()
  (ensure-dir arcdir*)
  (ensure-dir logdir*))

From srv.arc ©