*** empty log message ***

diff --git a/lily/ly-module.cc b/lily/ly-module.cc
index 5f3628928899ce4072a96a4ea8d9bb78bc7c273e..a0ee8393f5500173be68ea165026e077555d8e38 100644 (file)
--- a/lily/ly-module.cc
+++ b/lily/ly-module.cc
@@ -34,7 +34,7 @@ LY_DEFINE(ly_clear_anonymous_modules, "ly:clear-anonymous-modules",
       SCM closure = SCM_MODULE_EVAL_CLOSURE(module);
       SCM prop = scm_procedure_property (closure, ly_symbol2scm ("module")); 
 
-      if (ly_is_module (prop))
+      if (ly_c_module_p (prop))
        {
          scm_set_procedure_property_x (closure, ly_symbol2scm ("module"),
                                        SCM_BOOL_F);