incipit.ly: combine Scheme expressions

[lilypond.git] / input / regression / span-bar.ly

diff --git a/input/regression/span-bar.ly b/input/regression/span-bar.ly
index 94616a041b69c6bc1739a90ce5d9bb82b62ff00e..fc777550fce98a4921428ea8ea9348045c179c84 100644 (file)
--- a/input/regression/span-bar.ly
+++ b/input/regression/span-bar.ly
@@ -1,25 +1,42 @@
-\version "2.1.29"
+\version "2.14.0"

 \header {
 \header {

-texidoc = "Span bars are drawn only between staff bar lines. By setting 
+  texidoc = "Span bars are drawn only between staff bar lines. By setting 

 bar lines to transparent, they are shown only between systems.
 bar lines to transparent, they are shown only between systems.

+
+Setting @code{SpanBar} transparent  removes the barlines
+between systems.
+ 

 "
 }
 
 "
 }
 

-\score {
- \notes \relative c' \new StaffGroup <<
- \new Staff { a1 a1 a1}
-  \new Lyrics \lyrics <<
-   { bla1 die bla }
-   { foo bar foo }
-  >>
-  \new Staff { f1 f1 f1}
- >>
- \paper {
+\layout {

   \context {
   \context {

-   \StaffContext
-   \override BarLine #'transparent = ##t
+    \Staff

   }
   }

-  raggedright =##t 
- }
+  ragged-right =##t 

 }
 
 }
 

+\relative c' \new StaffGroup <<
+  \new Staff {
+    a1
+    \once \override Score.BarLine #'transparent = ##t
+    a1
+    \once \override Score.SpanBar #'transparent = ##t
+    a1 a1
+    \bar "|."
+  }
+  \lyricmode <<
+    \new Lyrics { bla1 die bla }
+    \new Lyrics { foo bar foo }
+  >>
+  \new Staff {
+    f1 f1 f1 f1
+  }
+>>
+
+
+
+%% Local variables:
+%% LilyPond-indent-level:2
+%% End:
+