X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fseparation-item.cc;h=013e457034bea442ae397211d431178888f0357c;hb=454aa3c226dc95889618b9b86b912c7717bbb94f;hp=56ed817e170987566f4e31be1e70d22159260b86;hpb=ee0488f3aa19e0060b6e17c46a4d88cb9d57c489;p=lilypond.git diff --git a/lily/separation-item.cc b/lily/separation-item.cc index 56ed817e17..013e457034 100644 --- a/lily/separation-item.cc +++ b/lily/separation-item.cc @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 1998--2010 Han-Wen Nienhuys + Copyright (C) 1998--2011 Han-Wen Nienhuys LilyPond is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -80,7 +80,8 @@ Skyline Separation_item::conditional_skyline (Grob *me, Grob *left) { vector bs = boxes (me, left); - return Skyline (bs, 0.0, Y_AXIS, LEFT); + Real horizon_padding = robust_scm2double (me->get_property ("skyline-vertical-padding"), 0.0); + return Skyline (bs, horizon_padding, Y_AXIS, LEFT); } @@ -90,8 +91,8 @@ Separation_item::calc_skylines (SCM smob) { Item *me = unsmob_item (smob); vector bs = boxes (me, 0); - /* todo: the horizon_padding is somewhat arbitrary */ - return Skyline_pair (bs, 0.0, Y_AXIS).smobbed_copy (); + Real horizon_padding = robust_scm2double (me->get_property ("skyline-vertical-padding"), 0.0); + return Skyline_pair (bs, horizon_padding, Y_AXIS).smobbed_copy (); } /* if left is non-NULL, get the boxes corresponding to the @@ -189,4 +190,5 @@ ADD_INTERFACE (Separation_item, "elements " "padding " "horizontal-skylines " + "skyline-vertical-padding " );