-#if 0
- bool find_inversion_b = false;
- SCM chord_inversion = get_property ("chordInversion");
- if (gh_boolean_p (chord_inversion))
- find_inversion_b = gh_scm2bool (chord_inversion);
-
- chord_ = Chord::pitches_and_requests_to_chord (pitches_,
- inversion_,
- bass_,
- find_inversion_b);
-
-#endif
-
- chord_name_p_ = new Item (get_property ("ChordName"));
- chord_name_p_->set_elt_property ("chord", chord_);
- announce_element (chord_name_p_, 0);
- SCM s = get_property ("drarnChords"); //FIXME!
- if (to_boolean (s) && last_chord_ != SCM_EOL &&
- gh_equal_p (chord_, last_chord_))
- chord_name_p_->set_elt_property ("begin-of-line-visible", SCM_BOOL_T);