(process_acknowledged): don't create

[lilypond.git] / lily / tuplet-number.cc

diff --git a/lily/tuplet-number.cc b/lily/tuplet-number.cc
index 97c49129b3109709be366a60f07f866b29bac58a..a68b99b0a5738c34793c1b5c232d4506ec0a680e 100644 (file)
--- a/lily/tuplet-number.cc
+++ b/lily/tuplet-number.cc
@@ -43,8 +43,9 @@ Tuplet_number::print (SCM smob)
       me->suicide ();
       return SCM_EOL;
     }
-  
-  Stencil *stc = unsmob_stencil (Text_interface::print (smob));
+
+  SCM stc_scm = Text_interface::print (smob);
+  Stencil *stc = unsmob_stencil (stc_scm);
 
   stc->align_to (X_AXIS, CENTER);
   stc->align_to (Y_AXIS, CENTER);
@@ -56,7 +57,7 @@ Tuplet_number::print (SCM smob)
 
   stc->translate ((points[RIGHT] + points[LEFT]) / 2);
   
-  return stc->smobbed_copy ();
+  return stc_scm;
 }