]> git.donarmstrong.com Git - lilypond.git/commitdiff
Use the collapse-height mechanism also for SystemStartBar.
authorMats Bengtsson <mats.bengtsson@s3.kth.se>
Mon, 15 Oct 2007 13:59:26 +0000 (15:59 +0200)
committerMats Bengtsson <mats.bengtsson@s3.kth.se>
Mon, 15 Oct 2007 13:59:26 +0000 (15:59 +0200)
Makes it possible to get a bar line at the left end of the
stave also for single stave scores.

lily/system-start-delimiter.cc
scm/define-grobs.scm

index 0d12490ff931c99e7dc4264c80bb65250474b6a9..64450ec25e236556d174391f00d46d45735a0f14 100644 (file)
@@ -113,9 +113,7 @@ System_start_delimiter::print (SCM smob)
   SCM glyph_sym = me->get_property ("style");
   Real len = ext.length ();
   if (ext.is_empty ()
-      || (robust_scm2double (me->get_property ("collapse-height"), 0.0) >= ext.length ())
-      || (glyph_sym == ly_symbol2scm ("bar-line")
-         && non_empty_count <= 1))
+      || (robust_scm2double (me->get_property ("collapse-height"), 0.0) >= ext.length ()))
     {
       me->suicide ();
       return SCM_UNSPECIFIED;
index 4609a7ca58ea7a49f51b5bef00a8ade078ce7e56..b11cc8a13ee51e00309d2e36bb014568ef0331ea 100644 (file)
        (X-offset . ,ly:side-position-interface::x-aligned-side)
        (direction . ,LEFT)
        (style . bar-line)
+       (collapse-height . 5.0)
        (thickness . 1.6)
        (stencil . ,ly:system-start-delimiter::print)
        (meta . ((class . Spanner)