]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/hyphen-engraver.cc
* lily/text-item.cc (interpret_string): new file, select font with
[lilypond.git] / lily / hyphen-engraver.cc
index f0d349a5fe2393c60fabd583e98859044dde00b9..9e87e8ecb1559f7c7816039159c5aa85929dc626 100644 (file)
@@ -73,7 +73,7 @@ completize_hyphen (Spanner* sp)
   if (!sp->get_bound (RIGHT))
     {
       SCM heads = sp->get_property ("heads");
-      if (ly_pair_p (heads))
+      if (is_pair (heads))
        {
          Item* it = dynamic_cast<Item*> (unsmob_grob (ly_car (heads)));
          if (it)