*** empty log message ***

[lilypond.git] / lily / note-heads-engraver.cc

diff --git a/lily/note-heads-engraver.cc b/lily/note-heads-engraver.cc
index 4bad6447d884732662f53a49b4f7823e27109e37..97a8b973916672a099570ddab40d1873ea86821d 100644 (file)
--- a/lily/note-heads-engraver.cc
+++ b/lily/note-heads-engraver.cc
@@ -59,12 +59,12 @@ Note_heads_engraver::try_music (Music *m)
   else if (Span_req *req_ = dynamic_cast<Span_req*> (m))
     {
       if (scm_equal_p (req_->get_mus_property ("span-type"),
-                      ly_str02scm ("abort")) == SCM_BOOL_T)
+                      scm_makfrom0str ("abort")) == SCM_BOOL_T)
        {
          in_ligature = 0;
        }
       else if (scm_equal_p (req_->get_mus_property ("span-type"),
-                           ly_str02scm ("ligature")) == SCM_BOOL_T)
+                           scm_makfrom0str ("ligature")) == SCM_BOOL_T)
        {
          in_ligature = (req_->get_span_dir () == START);
        }