]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/time-signature.cc
release: 1.3.105
[lilypond.git] / lily / time-signature.cc
index e6afe98bd224321c2b328c201673f6be3aa20da1..04725d8adc3c5bfb1caac90bce31d1175092717e 100644 (file)
@@ -15,7 +15,9 @@
 #include "font-interface.hh"
 
 MAKE_SCHEME_CALLBACK(Time_signature,brew_molecule,1);
-
+/*
+  TODO: make different functions for special and normal timesigs.
+ */
 SCM
 Time_signature::brew_molecule (SCM smob) 
 {
@@ -36,15 +38,15 @@ Time_signature::brew_molecule (SCM smob)
       String style (ly_scm2string (st));
       if (style[0]=='1')
        {
-         return time_signature (me, n, 0).create_scheme();
+         return time_signature (me, n, 0).smobbed_copy ();
        }
       else
        {
-         return special_time_signature (me, style, n, d).create_scheme();
+         return special_time_signature (me, style, n, d).smobbed_copy ();
        }
     }
   else
-    return time_signature (me, n,d).create_scheme();
+    return time_signature (me, n,d).smobbed_copy ();
 }
 
 Molecule