src/default.scm: remove unnecessary not statement in system-hostname-check #3
@ -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"))))
|
||||
|
Loading…
Reference in New Issue
Block a user