diff --git a/backend/bar-db.scm b/backend/bar-db.scm index 13f748b..3a01fe0 100644 --- a/backend/bar-db.scm +++ b/backend/bar-db.scm @@ -43,9 +43,13 @@ (bd-conn (connect `((dbname . ,name) - (host . ,host) - (user . ,user) - (password . ,pass))))) + ,@(if host + `((host . ,host)) + '()) + ,@(if user + `((user . ,user) + (password . ,pass)) + '()))))) (define (sql-null->symbol v) (if (sql-null? v) diff --git a/backend/texts.scm b/backend/texts.scm index ae24901..643e50e 100644 --- a/backend/texts.scm +++ b/backend/texts.scm @@ -38,12 +38,12 @@ (chicken format)) ;; Short banner - (define banner-line "BrmInv 0.0 (c) 2023-2025 Brmlab, z.s.") + (define banner-line "BrmInv 0.1 (c) 2023-2025 Brmlab, z.s.") ;; The license of this file and of the whole suite. (define license "ISC License -Copyright 2023 Brmlab, z.s. +Copyright 2023-2025 Brmlab, z.s. Dominik Pantůček Permission to use, copy, modify, and/or distribute this software