X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fbeam-engraver.cc;h=f19f7e604e69da3c9919b2bdc365402102ebd248;hb=7456fb7f523cfd77e628eab0824c530c5b758ccd;hp=4e4f991cb3dacdb0867c9ae5bcb975d28e34bca5;hpb=d2762a4f1add2bb04d6fc34d3c7ae03eeb7d500f;p=lilypond.git

diff --git a/lily/beam-engraver.cc b/lily/beam-engraver.cc
index 4e4f991cb3..f19f7e604e 100644
--- a/lily/beam-engraver.cc
+++ b/lily/beam-engraver.cc
@@ -308,7 +308,7 @@ Beam_engraver::acknowledge_stem (Grob_info info)
                         max (durlog - 2, 0),
                         Stem::is_invisible (stem),
                         stem_duration->factor (),
-                        (stem->get_property ("tuplet-start") == SCM_BOOL_T));
+                        (to_boolean (stem->get_property ("tuplet-start"))));
   Beam::add_stem (beam_, stem);
 }