* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.

[lilypond.git] / lily / key-engraver.cc

diff --git a/lily/key-engraver.cc b/lily/key-engraver.cc
index 927cc6032f0f3b7022a6f627aae9a922e8605099..c4209caa2ec218c54721b88b3aface0e06144386 100644 (file)
--- a/lily/key-engraver.cc
+++ b/lily/key-engraver.cc
@@ -79,7 +79,7 @@ Key_engraver::create_key (bool def)
   if (!def)
     {
       SCM vis = get_property ("explicitKeySignatureVisibility"); 
-      if (is_procedure (vis))
+      if (ly_c_procedure_p (vis))
        item_->set_property ("break-visibility",vis);
     }
 }