]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/time-signature-engraver.cc
release: 1.3.0
[lilypond.git] / lily / time-signature-engraver.cc
index a71769709fe8b67c9a9786d95fac946643669246..d9051d59aee360913ab2f5cc3aab0e03233c1ea2 100644 (file)
@@ -54,10 +54,10 @@ Time_signature_engraver::do_pre_move_processing()
 {
   if (time_signature_p_) 
     {
-      Scalar sigstyle = get_property ("timeSignatureStyle", 0);
-      if (sigstyle.length_i ())
+      SCM sigstyle = get_property ("timeSignatureStyle", 0);
+      if (gh_string_p (sigstyle))
        {
-         time_signature_p_->time_sig_type_str_ = sigstyle;
+         time_signature_p_->time_sig_type_str_ = ly_scm2string (sigstyle);
        }
 
       typeset_element (time_signature_p_);