(defpackage #:hp/env
  (:use #:cl)
  (:import-from #:cl-dotenv
                #:load-env)
  (:export #:hp-env))
(in-package #:hp/env)

(load-env (merge-pathnames "./.env"))

(defmacro env-var (name var)
  `(defun ,name ()
     (or (uiop:getenv ,var) "")))

(env-var hp-env "HP_ENV")