X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fclip-systems.ly;h=ed8ac5596c43fbb46f911095e1710702109b6b7f;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=328671f40e4d1464341d29b7b1aa5d6ee55f85be;hpb=f3a35eaef2b78440cdb150d36d8ff6d93e9c8d46;p=lilypond.git

diff --git a/Documentation/snippets/clip-systems.ly b/Documentation/snippets/clip-systems.ly
index 328671f40e..ed8ac5596c 100644
--- a/Documentation/snippets/clip-systems.ly
+++ b/Documentation/snippets/clip-systems.ly
@@ -4,37 +4,10 @@
 % and then run scripts/auxiliar/makelsr.py
 %
 % This file is in the public domain.
-%% Note: this file works from version 2.13.36
-\version "2.13.36"
+%% Note: this file works from version 2.19.56
+\version "2.19.56"
 
 \header {
-%% Translation of GIT committish: 59caa3adce63114ca7972d18f95d4aadc528ec3d
-  texidoces = "
-Este código muestra cómo recortar (extraer) fragmentos a partir de una
-partitura completa.
-
-Este archivo tiene que procesarse de forma separada con la opción
-@code{-dclip-systems}; la página de fragmentos de código podría no
-mostrar el resultado adecuadamente.
-
-La salida consiste en archivos con los nombres
-@samp{base-from-inicio-to-final[-número].eps}.
-
-
-Si se incluyen los comienzos y finales de los sistemas, incluyen las
-dimensiones del grob del sistema, por ejemplo los nombres de
-instrumento.
-
-
-Las notas de adorno en el punto final de la región no se incluyen.
-
-
-Las regiones pueden abarcar varios sistemas.  En este caso, se generan
-varios archivos EPS.
-
-"
-  doctitlees = "Recorte de sistemas"
-
   lsrtags = "paper-and-layout"
 
   texidoc = "
@@ -61,13 +34,13 @@ are generated.
   doctitle = "Clip systems"
 } % begin verbatim
 
-
 #(ly:set-option 'clip-systems)
 #(define output-suffix "1")
 
 origScore = \score {
   \relative c' {
-    \set Staff.instrumentName = #"bla"
+    \new Staff \with { instrumentName = "Instrument" } % begin verbatim
+
     c1
     d1
     \grace c16 e1
@@ -117,7 +90,7 @@ origScore = \score {
       \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)) }
+                            (ly:parser-output-name)) }
     }
   }
 }