diff --git a/mes/module/mes/guile/module.mes b/mes/module/mes/guile/module.mes
index d7a22a9e..e0c73a03 100644
--- a/mes/module/mes/guile/module.mes
+++ b/mes/module/mes/guile/module.mes
@@ -157,7 +157,7 @@
         (out)
         r))
     (lambda (key . args)
-      (format #f "ERROR: dynamic-wind: ~a ~s\n" key args)
+      (format (current-error-port) "ERROR: dynamic-wind: ~a ~s\n" key args)
       (out))))