mes: Oops, %moduledir debug info.
* mes/module/mes/boot-0.scm.in: Oops, %moduledir debug info.
This commit is contained in:
parent
17aeba8dc7
commit
e27e7af055
|
@ -183,9 +183,9 @@
|
||||||
"@VERSION@"))
|
"@VERSION@"))
|
||||||
(define (effective-version) %version)
|
(define (effective-version) %version)
|
||||||
|
|
||||||
(if (list 'and (list getenv "MES_DEBUG")
|
(if (and (getenv "MES_DEBUG")
|
||||||
(list not (list equal2? (list getenv "MES_DEBUG") "0"))
|
(not (equal2? (getenv "MES_DEBUG") "0"))
|
||||||
(list not (list equal2? (list getenv "MES_DEBUG") "1")))
|
(not (equal2? (getenv "MES_DEBUG") "1")))
|
||||||
(begin
|
(begin
|
||||||
(core:display-error ";;; %moduledir=")
|
(core:display-error ";;; %moduledir=")
|
||||||
(core:display-error %moduledir)
|
(core:display-error %moduledir)
|
||||||
|
|
Loading…
Reference in New Issue