* scm/font.scm: remove old markup legacy

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

diff --git a/lily/mark-engraver.cc b/lily/mark-engraver.cc
index e0c459684e7d2a5e27e71825f439cc139c72168c..0d875ba8c11a30ecc8a048770ae239e635ee62a6 100644 (file)
--- a/lily/mark-engraver.cc
+++ b/lily/mark-engraver.cc
@@ -128,7 +128,7 @@ Mark_engraver::process_music ()
        */
       
       SCM m = mark_req_->get_mus_property ("label");
-      if (gh_pair_p (m) || new_markup_p (m))
+      if (Text_item::markup_p (m))
        {
          text_->set_grob_property ("text",m);
        }