|
|
|
@ -36,7 +36,7 @@ |
|
|
|
value (settings-map key) |
|
|
|
value (settings-map key) |
|
|
|
; Through this hack we can read security-critical settings from (previously |
|
|
|
; Through this hack we can read security-critical settings from (previously |
|
|
|
; set) shell variables without commiting their content to CVS |
|
|
|
; set) shell variables without commiting their content to CVS |
|
|
|
value (if-not value |
|
|
|
value (if value value |
|
|
|
(System/getenv |
|
|
|
(System/getenv |
|
|
|
(upper-case |
|
|
|
(upper-case |
|
|
|
(replace (name key) #"-" ""))))] |
|
|
|
(replace (name key) #"-" ""))))] |
|
|
|
|