X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fclip-systems.ly;h=4ccd06d7a7131b73207ce0ccf355a25c837e5f90;hb=e9135d834819eba63b64ec711542480250b42b78;hp=48259b8474ef314198306f4d2e4ba8b74c21434c;hpb=70cc70f3a6183472b93fc4c2b4c60cc0375b6d64;p=lilypond.git

diff --git a/input/lsr/clip-systems.ly b/input/lsr/clip-systems.ly
index 48259b8474..4ccd06d7a7 100644
--- a/input/lsr/clip-systems.ly
+++ b/input/lsr/clip-systems.ly
@@ -1,13 +1,12 @@
 %% Do not edit this file; it is auto-generated from input/new
 %% This file is in the public domain.
-\version "2.11.35"
-\layout { ragged-right= ##t }
+%% Note: this file works from version 2.12.0
+\version "2.12.0"
 \header {
-  doctitle = "Clip systems"
   lsrtags = "paper-and-layout"  % a new tag like "Mixing text and music" or
 % "Special output" might be more adequate -jm
   texidoc = "
-This code shows how to clip (extracts) snippets from a full score.
+This code shows how to clip (extract) snippets from a full score.
 
 This file needs to be run separately with @code{-dclip-systems}; the
 snippets page may not adequately show the results.
@@ -15,59 +14,64 @@ snippets page may not adequately show the results.
 The result will be files named
 @file{@var{base}-from-@var{start}-to-@var{end}[-@var{count}].eps}.
 
-@itemize @bullet
-@item If system starts and ends are included, they include extents of the System grob, eg. instrument names.
-@item Grace notes at the end point of the region are not included.
-@item Regions can span multiple systems. In this case, multiple EPS files are generated.
+@itemize
+@item
+If system starts and ends are included, they include extents of the
+System grob, e.g., instrument names.
+
+@item
+Grace notes at the end point of the region are not included.
+
+@item
+Regions can span multiple systems.  In this case, multiple EPS files
+are generated.
+
 @end itemize
 "
-}
-% begin verbatim
-#(ly:set-option 'clip-systems)
+  doctitle = "Clip systems"
+} % begin verbatim
 
+
+#(ly:set-option 'clip-systems)
 #(set! output-count 1)
 
-origScore = \score{
-    \relative {
-      \set Staff.instrumentName = #"bla"
-      c1
-      d
-      \grace c16
-      e1
-      \key d\major
-      
-      f
-      \break  \clef bass
-      g,
-      fis
-    }  
+origScore = \score {
+  \relative c' {
+    \set Staff.instrumentName = #"bla"
+    c1
+    d1
+    \grace c16 e1
+    \key d \major
+    f1 \break
+    \clef bass
+    g,1
+    fis1
+  }
 }
 
-\book { 
+\book {
   \score {
     \origScore
     \layout {
-
-      %% each clip-region is a (START . END) pair
-      %% where both are rhythmic-locations.
+      % Each clip-region is a (START . END) pair
+      % where both are rhythmic-locations.
       
-      %% (make-rhythmic-locations BAR-NUMBER NUM DEN)
-      %% means NUM/DEN whole-notes into bar numbered BAR-NUMBER
+      % (make-rhythmic-locations BAR-NUMBER NUM DEN)
+      % means NUM/DEN whole-notes into bar numbered BAR-NUMBER
 
-      clip-regions
-      = #(list
-	  (cons
-	   (make-rhythmic-location 2 0 1)
-	   (make-rhythmic-location 4 0 1))
+      clip-regions = #(list
+      (cons
+       (make-rhythmic-location 2 0 1)
+       (make-rhythmic-location 4 0 1))
+      
+      (cons
+       (make-rhythmic-location 0 0 1)
+       (make-rhythmic-location 4 0 1))
 
-	  (cons
-	   (make-rhythmic-location 0 0 1)
-	   (make-rhythmic-location 4 0 1))
-	  
-	  (cons
-	   (make-rhythmic-location 0 0 1)
-	   (make-rhythmic-location 6 0 1))
-	)
+      (cons
+       (make-rhythmic-location 0 0 1)
+       (make-rhythmic-location 6 0 1))
+      )
     }
   }
 }
@@ -81,7 +85,9 @@ origScore = \score{
   \score {
     \lyrics {
       \markup { from-2.0.1-to-4.0.1-clip.eps }
-      \markup { \epsfile #X #30.0 #(format #f "~a-1-from-2.0.1-to-4.0.1-clip.eps" (ly:parser-output-name parser)) }
+      \markup {
+        \epsfile #X #30.0 #(format #f "~a-1-from-2.0.1-to-4.0.1-clip.eps"
+                            (ly:parser-output-name parser)) }
     }
   }
 }