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

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

diff --git a/lily/mark-engraver.cc b/lily/mark-engraver.cc
index 7281e21f54deaf56135e81aa87a3e10d75a38536..18733b052704131d222173623231dcb8b94c48ed 100644 (file)
--- a/lily/mark-engraver.cc
+++ b/lily/mark-engraver.cc
@@ -113,7 +113,7 @@ Mark_engraver::process_music ()
       SCM m = mark_ev_->get_property ("label");
       SCM proc = get_property ("markFormatter");
       if (!Text_item::markup_p (m) &&
-         is_procedure (proc))
+         ly_c_procedure_p (proc))
        {
          if (!is_number (m)) 
            m =  get_property ("rehearsalMark");