]> Shamusworld >> Repos - music/blobdiff - all-creatures-of-our-god-and-king.ly
New charts "How Great Thou Art" and "In The Garden".
[music] / all-creatures-of-our-god-and-king.ly
index bb806ea4090e872371700e70ea0f3627d33e7928..e48a28d797e31ca17a93a9323251f9d1e42fb240 100644 (file)
@@ -25,7 +25,7 @@ staffSize = #20
 Global =
 {
        \key d \major
-       \override Staff.TimeSignature #'style = #'()
+       \numericTimeSignature
        \time 6/4
 
        s1.*8 \bar "|."   % 1-16
@@ -123,8 +123,9 @@ Chords = \chordmode
 %Cross = { \override NoteHead #'style = #'cross }
 Rhythm = \relative c
 {
-       \override Staff.TimeSignature #'style = #'()
+       \numericTimeSignature
        \override NoteHead #'style = #'slash
+       \teeny
 
        % Verse
 
@@ -136,7 +137,7 @@ Rhythm = \relative c
        c4 c c c c c |   % 5
        c4 c c c c c |   % 6
        c4 c c c c c |   % 7
-       c4 c c c c c \bar "|."   % 8
+       c4 c c c c c |   % 8
 }
 
 
@@ -165,7 +166,7 @@ Dynamics =
 \score
 {
        <<
-               \Global                                         % The "roadmap" that everything else depends on
+               \Global         % The "roadmap" that everything else depends on
 
                \context Staff
                <<
@@ -193,11 +194,11 @@ Dynamics =
 
 \paper
 {
-  #(define fonts (make-pango-font-tree
-    "Times New Roman"
-    "DomCasual BT"
-    "Luxi Mono"
-    (/ staffSize 20)))
+       #(define fonts (make-pango-font-tree
+               "Times New Roman"
+               "JazzText"
+               "Luxi Mono"
+               (/ staffSize 20)))
 
 % Spread staves vertically across last page (default: t)
 %      ragged-last-bottom = ##f
@@ -208,6 +209,5 @@ Dynamics =
 
 % To find out what's eating the space at the top...
 %      annotate-spacing = ##t
-%let's try this: [It works! Huzzah!]
-       obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 }
+