]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/chord-name-engraver.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / chord-name-engraver.cc
index 05f0dd75b50fa6bcf2d9f9c6bd413607aa57b5d5..c8ba1d2bebb98a22c8db25a4b9b6632563ece822 100644 (file)
@@ -114,7 +114,7 @@ Chord_name_engraver::process_music ()
   announce_grob (chord_name_, notes_[0]->self_scm ());
   SCM s = get_property ("chordChanges");
   if (to_boolean (s) && ly_c_pair_p (last_chord_) 
-      && is_equal (chord_as_scm, last_chord_))
+      && ly_c_equal_p (chord_as_scm, last_chord_))
     chord_name_->set_property ("begin-of-line-visible", SCM_BOOL_T);
 
   last_chord_ = chord_as_scm;