web/panettone/src/util.lisp


1
2
3
4
5
6
7

(in-package :panettone.util)

(defun integer-env (var &key default)
  (or
   (when-let ((str (uiop:getenvp var)))
     (try-parse-integer str))
   default))