diff options
Diffstat (limited to 'web/panettone/src/util.lisp')
| -rw-r--r-- | web/panettone/src/util.lisp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/web/panettone/src/util.lisp b/web/panettone/src/util.lisp new file mode 100644 index 0000000000..9fd9ceaa79 --- /dev/null +++ b/web/panettone/src/util.lisp @@ -0,0 +1,7 @@ +(in-package :panettone.util) + +(defun integer-env (var &key default) + (or + (when-let ((str (uiop:getenvp var))) + (try-parse-integer str)) + default)) |