mes: Remove debugging.
authorJan Nieuwenhuizen <janneke@gnu.org>
Wed, 2 May 2018 20:52:31 +0000 (22:52 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Wed, 2 May 2018 20:52:31 +0000 (22:52 +0200)
* module/mes/module.mes (mes-load-module-env): Remove debugging.

module/mes/module.mes

index 716ca3b6a8782d4152cb33b43e83c3b2203a7197..667817e807b593f19d11a1a3ec4fd1b87a425db3 100644 (file)
@@ -58,5 +58,7 @@
     (set-current-input-port (pop! *input-ports*))
     x))
 (define (mes-load-module-env module a)
-  (core:write-error (string-append %moduledir (module->file module))) (core:display-error "\n")
-  (primitive-load (string-append %moduledir (module->file module))))
+  ((lambda (file-name)
+     (core:write-error file-name) (core:display-error "\n")
+     (primitive-load file-name))
+   (string-append %moduledir (module->file module))))