web-fr: nitpicks in troduction

[lilypond.git] / input / regression / system-start-nesting.ly

diff --git a/input/regression/system-start-nesting.ly b/input/regression/system-start-nesting.ly
index 79ee62007762d8fabd229947403cf1ee3f0390b0..41a4a72a2a73bf9a28c8087e59714f1e8402e087 100644 (file)
--- a/input/regression/system-start-nesting.ly
+++ b/input/regression/system-start-nesting.ly
@@ -1,21 +1,17 @@
-\header { texidoc = "Deeply nested system braces/brackets/etc. may be created with the
-  @code{Nested_system_start_delimiter_engraver}"
-
+\header { texidoc = "Deeply nested system braces, brackets, etc., may be
+  created with the @code{systemStartDelimiterHierarchy} property."
 }
 
-\version "2.7.18"
+\version "2.17.15"
 
 \paper {
-  raggedright = ##t
+  ragged-right = ##t
 }
 
-\new StaffGroup \with {
-  \remove "System_start_delimiter_engraver"
-  \consists "Nested_system_start_delimiter_engraver"
-}
-\relative <<
-  \override StaffGroup.NestedSystemStartDelimiter #'styles = #'(line-bracket bracket line-bracket)
-  \set StaffGroup.systemStartDelimiterHierarchy = #'((a (b)) c)
+\new StaffGroup
+\relative c' <<
+  \set StaffGroup.systemStartDelimiterHierarchy
+    = #'(SystemStartSquare (SystemStartBracket a (SystemStartSquare b)) d)
   \new Staff { c1 }
   \new Staff { c1 }
   \new Staff { c1 }