(convert-to-dvi): redirect output to

[lilypond.git] / lily / beam.cc

diff --git a/lily/beam.cc b/lily/beam.cc
index abe86359f175b5a9849dc444f8ae8b2d62790aad..dcf2e1893a10f58a5e773e9f2c8fa4ddd818954a 100644 (file)
--- a/lily/beam.cc
+++ b/lily/beam.cc
@@ -353,7 +353,7 @@ Beam::print (SCM grob)
   Real gap_length = robust_scm2double (me->get_property ("gap"), 0.0);
   
   Stencil the_beam;
-  Real lt = me->get_paper ()->get_dimension (ly_symbol2scm ("linethickness"));
+  Real lt = me->get_layout ()->get_dimension (ly_symbol2scm ("linethickness"));
   
   for (int i = 0; i<= stems.size (); i++)
     {
@@ -415,7 +415,7 @@ Beam::print (SCM grob)
        w += stem_width/ 2 ;
       
 
-      Real blot = me->get_paper ()->get_dimension (ly_symbol2scm ("blotdiameter"));
+      Real blot = me->get_layout ()->get_dimension (ly_symbol2scm ("blotdiameter"));
       Stencil whole = Lookup::beam (slope, w, thick, blot);
       Stencil gapped;
 
@@ -509,7 +509,7 @@ Beam::print (SCM grob)
 
 #if (DEBUG_QUANTING)
   SCM quant_score = me->get_property ("quant-score");
-  if (to_boolean (me->get_paper ()->lookup_variable (ly_symbol2scm ("debug-beam-quanting")))
+  if (to_boolean (me->get_layout ()->lookup_variable (ly_symbol2scm ("debug-beam-quanting")))
       && scm_is_string (quant_score))
     {
       
@@ -524,7 +524,7 @@ Beam::print (SCM grob)
       Direction stem_dir = stems.size() ? to_dir (stems[0]->get_property ("direction")) : UP;
     
       Stencil tm = *unsmob_stencil (Text_interface::interpret_markup
-        (me->get_paper ()->self_scm (), properties, quant_score));
+        (me->get_layout ()->self_scm (), properties, quant_score));
       the_beam.add_at_edge (Y_AXIS, stem_dir, tm, 1.0, 0);
     }
 #endif