From ed2a457f2ca56742326701d789f7c65e891cc646 Mon Sep 17 00:00:00 2001
From: Graham Percival <graham@percival-music.ca>
Date: Sat, 19 Jan 2008 20:06:53 -0800
Subject: [PATCH] LSR: update.

---
 .../lsr/clefs-commonly-tweaked-properties.ly  | 92 +++++++++----------
 input/lsr/compound-time-signatures.ly         |  4 +-
 input/lsr/generating-random-notes.ly          |  4 +-
 ...ith-minimum-accidentals-smart-transpose.ly |  5 +-
 4 files changed, 53 insertions(+), 52 deletions(-)

diff --git a/input/lsr/clefs-commonly-tweaked-properties.ly b/input/lsr/clefs-commonly-tweaked-properties.ly
index b1ce2f4b27..2ce8f3f951 100644
--- a/input/lsr/clefs-commonly-tweaked-properties.ly
+++ b/input/lsr/clefs-commonly-tweaked-properties.ly
@@ -35,49 +35,49 @@ line, they do not.
 " }
 % begin verbatim
 {
-           % The default treble clef
-           c'1
-           % The standard bass clef
-           \set Staff.clefGlyph = #"clefs.F"
-           \set Staff.clefPosition = #2
-           \set Staff.middleCPosition = #6
-           c'
-           % The baritone clef
-           \set Staff.clefGlyph = #"clefs.C"
-           \set Staff.clefPosition = #4
-           \set Staff.middleCPosition = #4
-           c'
-           % The standard choral tenor clef
-           \set Staff.clefGlyph = #"clefs.G"
-           \set Staff.clefPosition = #-2
-           \set Staff.clefOctavation = #-7
-           \set Staff.middleCPosition = #1
-           c'
-           % A non-standard clef
-           \set Staff.clefPosition = #0
-           \set Staff.clefOctavation = #0
-           \set Staff.middleCPosition = #-4
-           c' \break
-           
-           
-           % The following clef changes do not preserve
-           % the normal relationship between notes and clefs:
-
-           \set Staff.clefGlyph = #"clefs.F"
-           \set Staff.clefPosition = #2
-           c'
-           \set Staff.clefGlyph = #"clefs.G"
-           c'
-           \set Staff.clefGlyph = #"clefs.C"
-           c'
-           \set Staff.clefOctavation = #7
-           c'
-           \set Staff.clefOctavation = #0
-           \set Staff.clefPosition = #0
-           c'
-           
-           % Here we go back to the normal clef:
-           
-           \set Staff.middleCPosition = #4
-           c'
-         }
+  % The default treble clef
+  c'1
+  % The standard bass clef
+  \set Staff.clefGlyph = #"clefs.F"
+  \set Staff.clefPosition = #2
+  \set Staff.middleCPosition = #6
+  c'
+  % The baritone clef
+  \set Staff.clefGlyph = #"clefs.C"
+  \set Staff.clefPosition = #4
+  \set Staff.middleCPosition = #4
+  c'
+  % The standard choral tenor clef
+  \set Staff.clefGlyph = #"clefs.G"
+  \set Staff.clefPosition = #-2
+  \set Staff.clefOctavation = #-7
+  \set Staff.middleCPosition = #1
+  c'
+  % A non-standard clef
+  \set Staff.clefPosition = #0
+  \set Staff.clefOctavation = #0
+  \set Staff.middleCPosition = #-4
+  c' \break
+  
+  
+  % The following clef changes do not preserve
+  % the normal relationship between notes and clefs:
+  
+  \set Staff.clefGlyph = #"clefs.F"
+  \set Staff.clefPosition = #2
+  c'
+  \set Staff.clefGlyph = #"clefs.G"
+  c'
+  \set Staff.clefGlyph = #"clefs.C"
+  c'
+  \set Staff.clefOctavation = #7
+  c'
+  \set Staff.clefOctavation = #0
+  \set Staff.clefPosition = #0
+  c'
+  
+  % Here we go back to the normal clef:
+  
+  \set Staff.middleCPosition = #4
+  c'
+}
diff --git a/input/lsr/compound-time-signatures.ly b/input/lsr/compound-time-signatures.ly
index a37fa3f217..9898245e2e 100644
--- a/input/lsr/compound-time-signatures.ly
+++ b/input/lsr/compound-time-signatures.ly
@@ -9,8 +9,8 @@ as compound time signatures (e.g. \"3/8 + 2/8\"), which combine two or
 more inequal metrics. LilyPond can make such musics quite easy to read
 and play, by explicitly printing the compound time signatures and
 adapting the automatic beaming behaviour. (You can even add graphic
-measure groping indications, the appropriate snippet in this database.)
-
+measure grouping indications, see the appropriate snippet in this
+database.) 
 " }
 % begin verbatim
 #(define (compound-time one two num)
diff --git a/input/lsr/generating-random-notes.ly b/input/lsr/generating-random-notes.ly
index 5e699102e9..0c0ae4e2d3 100644
--- a/input/lsr/generating-random-notes.ly
+++ b/input/lsr/generating-random-notes.ly
@@ -4,7 +4,7 @@
 \version "2.11.35"
 
 \header { texidoc = "
-This Scheme-based snippet allows you to generate 32 random notes (or as
+This Scheme-based snippet allows you to generate 24 random notes (or as
 many as you want), based on the current time (or any randomish number
 you might wish to specify instead, so you can obtain the same random
 notes each time): i.e. to get different random notes patterns, just
@@ -23,6 +23,6 @@ change this number.
                               'pitch (ly:make-pitch (quotient idx 7)
                                       (remainder idx 7)
                                       0))))))
-       (make-list 32)))))
+       (make-list 24)))))
    }
 }
diff --git a/input/lsr/transposing-pitches-with-minimum-accidentals-smart-transpose.ly b/input/lsr/transposing-pitches-with-minimum-accidentals-smart-transpose.ly
index 69d3e3af7a..f68947abbe 100644
--- a/input/lsr/transposing-pitches-with-minimum-accidentals-smart-transpose.ly
+++ b/input/lsr/transposing-pitches-with-minimum-accidentals-smart-transpose.ly
@@ -64,9 +64,10 @@ naturaliseMusic =
 			(naturalise m))
 
 \score {
-   \context Staff {
+   \new Staff {
     \transpose c ais \music
-    \naturaliseMusic \transpose c ais \music
+    \naturaliseMusic \transpose c ais \music 
+    \break
     \transpose c deses \music
     \naturaliseMusic \transpose c deses \music
   }
-- 
2.39.5