* input/regression/hara-kiri-pianostaff.ly (disappear): remove

superfluous s1.
(disappear): bugfix.

* scm/lily-library.scm (paper-system-title?): new function.

diff --git a/ChangeLog b/ChangeLog
index d11701d8928b931508fccfba9409e7d19714428c..66fac68f160b09b89d1711fd55b012c4a0ffd436 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2005-09-27  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
+       * input/regression/hara-kiri-pianostaff.ly (disappear): remove
+       superfluous s1.
+       (disappear): bugfix.
+
        * lily/stem-tremolo.cc (raw_stencil): read slope property.
 
        * lily/include/paper-system.hh (class Paper_system): remove

diff --git a/Documentation/topdocs/NEWS.tely b/Documentation/topdocs/NEWS.tely
index 67757d8e3b2b4769de019f00dcb15da9825cc9f7..c5035cde4213bd59f4acd8d9f2a416723f7bc769 100644 (file)
--- a/Documentation/topdocs/NEWS.tely
+++ b/Documentation/topdocs/NEWS.tely
@@ -60,7 +60,7 @@ This feature was sponsored by Sven Axelsson.
 Vertical spacing for page layout can now be tuned for each system
 individually.  
 
-This feature was sponsored by Trevor Baca.
+This feature was sponsored by Trevor Baca and Nicolas Sceaux.
 
 @item
 Laissez vibrer ties can be created with @code{\laissezVibrer},

diff --git a/input/regression/hara-kiri-pianostaff.ly b/input/regression/hara-kiri-pianostaff.ly
index 182ef9f982ebfa9d3be35046fc10d70e870a5465..0a541a5e2858699726f8c7783e65d894e3b0d085 100644 (file)
--- a/input/regression/hara-kiri-pianostaff.ly
+++ b/input/regression/hara-kiri-pianostaff.ly
@@ -16,22 +16,20 @@ This example was done with a pianostaff, which has fixed distance
 alignment; this should not confuse the mechanism.
 "
          
-       }
 
-\layout { raggedright= ##t }
-
-
-\transpose c c''
-\context PianoStaff <<
-  \new Staff {  c4 c c c \break  s1 \break c4 c c c \break c c c c}
-  \new Staff {  d4 d d d s1 s1 s1 s1 }
-  \new Staff {  e4 e e e s1 e4 e e e s1 }
->>
 \layout {
+  raggedright= ##t
   \context {
     \RemoveEmptyStaffContext
   }
 }
 
+\transpose c c''
+\context PianoStaff <<
+  \new Staff {  c4 c c c \break s1 \break c4 c c c \break c c c c}
+  \new Staff {  d4 d d d        s1        s1              s1 }
+  \new Staff {  e4 e e e        s1        e4 e e e        s1 }
+>>
+