src/default.scm: add unnecessary not statement in system-hostname-check

Signed-off-by: molese <molese@protonmail.com>
This commit is contained in:
molese 2021-11-30 12:37:36 +06:00
parent f95f4e39db
commit 83d2cba944
No known key found for this signature in database
GPG Key ID: 61C53544E95B132E

View File

@ -11,7 +11,7 @@
; or if it's value is empty
;; FIXME-QA(Molese): Needs test
(define system-hostname-check (lambda ()
(if (not (eq nil (getenv "HOSTNAME")))
(if (eq nil (getenv "HOSTNAME"))
(throw 1 "Environment variable 'HOSTNAME' is not set, unable to apply sufficient configuration"))
(if (eq? (getenv "HOSTNAME") #f)
(throw 1 "Environment variable 'HOSTNAME' is empty, unable to apply sufficient configuration"))))