Change direction #1, #-1 into #up, #down.

diff --git a/ChangeLog b/ChangeLog
index 9a731beda70bdddf31dc743bd235810aba9af2c9..1db43919af8a6ce369ae3948d6852c75468d3d2b 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2005-08-18  Graham Percival  <gpermus@gmail.com>
+
+       * input/ {various}: change direction #1, #-1 to
+       #up/#down or \fooUp, \fooDown.
+
 2005-08-18  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
        * lily/include/engraver-group.hh: rename.

diff --git a/input/les-nereides.ly b/input/les-nereides.ly
index dea383a68cd9518db8aef51b1258cad80fec2262..03399daa378eb6f65772abc6f986ad23c4b2fb70 100644 (file)
--- a/input/les-nereides.ly
+++ b/input/les-nereides.ly
@@ -74,7 +74,7 @@ treble = \new Voice \relative c''{
     r8 <a' a,>8(\mf <gis gis,> <fis fis,>
     
     % \fingerUp
-    \override Fingering  #'direction = #1
+    \override Fingering  #'direction = #up
     
     <gis gis,> <fis fis,> e)-1-4-5 r
 
@@ -90,7 +90,7 @@ trebleTwo = \new Voice \relative c''{
     \stemDown
     \slurDown
     % \fingerDown
-    \override Fingering  #'direction = #-1
+    \override Fingering  #'direction = #down
     s2
     | %1
     s1*2
@@ -137,12 +137,12 @@ bass = \new Voice \relative c{
 %    \once \override Stem  #'length = #6 %tweak
     <a a,>4\sustainDown
     \change Staff=treble
-                           
-    \revert Stem #'direction
-    \override Stem  #'direction = #-1
+                       
+    \stemNeutral
+    \stemDown    
     <a' fis cis>)\arpeggio
     \change Staff=bass
-    \revert Stem #'direction
+    \stemNeutral
     r2
     
     | %4
@@ -173,7 +173,7 @@ bass = \new Voice \relative c{
     \slurUp
     
     % \fingerDown
-    \override Fingering  #'direction = #-1
+    \override Fingering  #'direction = #down
 
                           
     \override Staff.SustainPedalLineSpanner #'staff-padding = #3.5 %tweak

diff --git a/input/mutopia/F.Schubert/standchen.ly b/input/mutopia/F.Schubert/standchen.ly
index 0d4faec693f981ae5c84bc4c11d4cd5db1b83f14..02de0f42541c43bab1ae9bb1938bf6d61be3b573 100644 (file)
--- a/input/mutopia/F.Schubert/standchen.ly
+++ b/input/mutopia/F.Schubert/standchen.ly
@@ -42,9 +42,6 @@ instrument = "Piano"
 
 \version "2.5.18"
 
-dynamicUp = \override DynamicLineSpanner  #'direction = #1
-dynamicRevert = \revert DynamicLineSpanner #'direction
-
 #(set-global-staff-size 16)
 
 vocalVerse = \relative c''{

diff --git a/input/mutopia/R.Schumann/romanze-op28-2.ly b/input/mutopia/R.Schumann/romanze-op28-2.ly
index 26ad78c99f38178c2dfecdc4a415f55eaa36b860..e1d0fa9188e54465612a040fdeaaf8f2dffc6bd1 100644 (file)
--- a/input/mutopia/R.Schumann/romanze-op28-2.ly
+++ b/input/mutopia/R.Schumann/romanze-op28-2.ly
@@ -123,7 +123,7 @@ rightb =  \transpose c cis' {
   f,8.. f32^1 g8^2  a4.) |
   a4^1( c8^1_\accent~[c b)] g16^1([ b^2] |
    c4)^1 es8^1~es d^1 f^1~ |
-  \override PianoStaff.Arpeggio  #'direction = #1
+  \override PianoStaff.Arpeggio  #'direction = #up
   f f8.. f32^1( as4.)^\fermata\arpeggio ~ |
   \revert PianoStaff.Arpeggio #'direction
   \stemUp \tieUp as r4 r8 |
@@ -257,7 +257,7 @@ leftb =  \transpose c cis {
     
     \set PianoStaff.instrument = "  2."
     \context Staff = "up" {
-      \override Staff.DynamicLineSpanner   #'direction = #-1
+      \override Staff.DynamicLineSpanner   #'direction = #down
       \clef G <<\global \context Voice = "upv" \righta >>
     }
     \context Staff = "mid" {
@@ -270,7 +270,7 @@ leftb =  \transpose c cis {
       \clef F <<\global \context Voice = "midv" \rightb>>
     }
       \context Staff = "down" {
-        \override Staff.DynamicLineSpanner   #'direction = #1
+        \override Staff.DynamicLineSpanner   #'direction = #up
         \clef F
        << \global \context Voice = "lva" \lefta \context Voice = "lvb" \leftb >>
     }

diff --git a/input/mutopia/claop.py b/input/mutopia/claop.py
index efef518631a601431a14d27f5cd8c99d027fa7ff..b472de991aec39140880161ed50e49d9c77fef61 100644 (file)
--- a/input/mutopia/claop.py
+++ b/input/mutopia/claop.py
@@ -276,7 +276,7 @@ sys.stdout.write (r"""
          #'(end * * * *) = #(ly:make-moment 1 4)
        \property Score.skipBars = ##t
        \context StaffGroup <
-           \property StaffGroup.Stem \override #'direction = #1
+           \property StaffGroup.Stem \override #'direction = #up
 """)
 
 

diff --git a/input/regression/arpeggio.ly b/input/regression/arpeggio.ly
index d48ccf8ed33f005041b840122b33cbbb30554844..8d35d974425c8402362a21b96ee49b15eb528014 100644 (file)
--- a/input/regression/arpeggio.ly
+++ b/input/regression/arpeggio.ly
@@ -11,7 +11,7 @@ Arpeggios are supported, both cross-staff and broken single staff.
 \context PianoStaff << 
   \new Staff \relative c''{
     <fis,  d a>\arpeggio
-    \override Staff.Arpeggio  #'arpeggio-direction = #1 
+    \arpeggioUp
     <fis d a >\arpeggio            
     %%\override PianoStaff.SpanArpeggio  #'connect = ##t
     \set PianoStaff.connectArpeggios = ##t
@@ -20,7 +20,7 @@ Arpeggios are supported, both cross-staff and broken single staff.
   \new Staff\relative c{
     \clef bass
     <g b d>\arpeggio
-    \override Staff.Arpeggio  #'arpeggio-direction = #-1
+    \arpeggioDown
     <g b d>\arpeggio
     <g b d>\arpeggio
   }

diff --git a/input/regression/figured-bass.ly b/input/regression/figured-bass.ly
index db373934746aa471c5bc97c7bee4827e5b9fdb78..85ba15eba0cab6792e377e88524f35046943dc2e 100644 (file)
--- a/input/regression/figured-bass.ly
+++ b/input/regression/figured-bass.ly
@@ -14,7 +14,7 @@ last bass figure.
 <<
     \figures { 
        <3 [5 7]>
-       \once \override BassFigure  #'direction = #-1
+       \once \override BassFigure  #'direction = #down
        <3 [5 7]>
        <3 [5] 7 [9 11]>
        <3+ 5- 7!>

diff --git a/input/regression/spacing-bar-stem.ly b/input/regression/spacing-bar-stem.ly
index 68cd8d1487292f323d55042597e4708790ce06e9..d8df82bc86949e5686de2484654675772c1f066b 100644 (file)
--- a/input/regression/spacing-bar-stem.ly
+++ b/input/regression/spacing-bar-stem.ly
@@ -9,17 +9,15 @@ Accidentals after the barline get some space as well.
 "
 }
 
-sd = \override Stem  #'direction = #-1
-su = \override Stem  #'direction = #1
 \relative c''
 {
 
   %%\override Staff.StaffSpacing  #'stem-spacing-correction = #10
   %%\override Staff.NoteSpacing  #'stem-spacing-correction = #10
 
-  \time 1/4 \sd c4 \su c4
-  \sd c4 \su c4
-  \sd f c,4  c'4 cis4 \stemUp c4
+  \time 1/4 \stemDown c4 \stemUp c4
+  \stemDown c4 \stemUp c4
+  \stemDown f c,4  c'4 cis4 \stemUp c4
 }
 \layout { raggedright = ##t}
 

diff --git a/input/regression/spacing-stem-bar.ly b/input/regression/spacing-stem-bar.ly
index 52086b9374c0000a31a1b6a2d4f2c7bebfeced64..3310b800d0bab9bf9837f65873f775fe1edb62d0 100644 (file)
--- a/input/regression/spacing-stem-bar.ly
+++ b/input/regression/spacing-stem-bar.ly
@@ -8,8 +8,6 @@ space. This is an optical correction similar to juxtaposed stems.
 
 }
 
-sd = \override Stem  #'direction = #-1
-su = \override Stem  #'direction = #1
 \relative e'
 {
 
@@ -17,7 +15,7 @@ su = \override Stem  #'direction = #1
                                %%\override Staff.NoteSpacing  #'stem-spacing-correction = #0.5
 
   \time 3/8
-  \su
+  \stemUp
   e8 e e
   f f f
   a a a

diff --git a/input/regression/spacing-stem-direction.ly b/input/regression/spacing-stem-direction.ly
index 1bfeb562f92441c29a3685e0c870a3bd30fb97ee..8762620c978da356029d886786bd5a1f3d95324e 100644 (file)
--- a/input/regression/spacing-stem-direction.ly
+++ b/input/regression/spacing-stem-direction.ly
@@ -14,7 +14,7 @@ much to correct."
 
 \context Voice \relative c {
   %% make sure neutral is down.
-  \override Stem  #'neutral-direction = #-1
+  \override Stem  #'neutral-direction = #down
   \time 16/4  c''4 c c,  c' d, c' e, c' f, c' g c a c b c
 }
 

diff --git a/input/regression/stem-tremolo.ly b/input/regression/stem-tremolo.ly
index 61098a6b8243c2436259fdc656d4cdd8653aead8..6482c3a6745bc57c229ae6897d9f481dcdb10b4d 100644 (file)
--- a/input/regression/stem-tremolo.ly
+++ b/input/regression/stem-tremolo.ly
@@ -12,7 +12,7 @@ tremolo must be centered on the note.
 
 
 \context Voice \relative c''{
-  \override TextScript  #'direction = #1
+  \textSpannerUp
   \override TextScript  #'padding = #5
   a1:4^":4" a:8^":8" c:16^":16" a:32^":32" a^"x" a:^":"
   a4:4 c:8 a:16 c:32 a a: a2:

diff --git a/input/regression/tie-chord.ly b/input/regression/tie-chord.ly
index 14918a58334f2f85500b5837ef8ab9385d2410e1..2230837fd9634c2f19992730f8d46362fb878852 100644 (file)
--- a/input/regression/tie-chord.ly
+++ b/input/regression/tie-chord.ly
@@ -16,7 +16,6 @@ t =  \relative c' {   <c e g> ~ <c e g> }
   \t
   \transpose c g \t
 
-  \override TieColumn  #'direction = #-1
   \t
 
 }

diff --git a/input/regression/tuplet-properties.ly b/input/regression/tuplet-properties.ly
index c968531b4062d4fab32527f22e9358029ee18b71..cab4fd11830761af71f8997ab193ba05125e05f2 100644 (file)
--- a/input/regression/tuplet-properties.ly
+++ b/input/regression/tuplet-properties.ly
@@ -24,7 +24,7 @@ for instance, bracketed (B) and non-bracketed (NB).
   \override TupletBracket  #'bracket-visibility = #'if-no-beam  
   \times 2/3 {  c8[ c c]  }
   
-  \override TupletBracket  #'direction = #1
+  \tupletUp
   \override TupletBracket  #'number-visibility = ##f
   \times 2/3 { c8^""^""^"up, no digit"  c[ c]  }
   \revert TupletBracket #'number-visibility
@@ -37,7 +37,7 @@ for instance, bracketed (B) and non-bracketed (NB).
   \revert TupletBracket #'shorten-pair
   \override TupletBracket  #'bracket-flare = #'(0.5 . 0.5)
   \times 2/3 { b^""^""^"angled edges" b b }
-  \revert TupletBracket #'direction
+  \tupletNeutral
   \times 2/3 { b b b }
 
 }

diff --git a/input/screech-boink.ly b/input/screech-boink.ly
index 6ee16df6caaa4e0cc2ba603fe26b168d69afa345..967659055b40fa6ea350ddfbb27d66b43197535f 100644 (file)
--- a/input/screech-boink.ly
+++ b/input/screech-boink.ly
@@ -23,7 +23,7 @@
                    c'''32      \change Staff = down
                    g16]
                \change Staff = up
-               \override Stem  #'direction = #1
+               \stemUp
                \set followVoice = ##t
                c'''32([ b''16 a''16 gis''16 g''32)]  } \\
               { s4 \times 2/3 { d'16[ f' g'] } as'32[ b''32 e'' d''] } \\
@@ -46,7 +46,7 @@
                <g cis>
            } \\
               {
-                  \override Staff.Arpeggio  #'arpeggio-direction =#-1
+                  \override Staff.Arpeggio  #'arpeggio-direction =#down
                   <cis, e, gis, b, cis>4\arpeggio  }
           >>
        }

diff --git a/input/test/ancient-font.ly b/input/test/ancient-font.ly
index 7eb825da10078f43b8727a0dee6c6c5c6518e277..e135a20c5d87ace900cc6d9209ed58498510596f 100644 (file)
--- a/input/test/ancient-font.ly
+++ b/input/test/ancient-font.ly
@@ -262,7 +262,7 @@ lowerStaff = \context MensuralStaff = "lowerStaff" <<
            \override Accidental #'style = #'mensural
            \override Custos #'style = #'mensural
            \override Custos #'neutral-position = #3
-           \override Custos #'neutral-direction = #-1
+           \override Custos #'neutral-direction = #down
            clefGlyph = #"clefs.petrucci.c2"
            clefPosition = #-2
            clefOctavation = #0 
@@ -280,7 +280,7 @@ lowerStaff = \context MensuralStaff = "lowerStaff" <<
            \override Accidental #'style = #'vaticana
            \override Custos #'style = #'vaticana
            \override Custos #'neutral-position = #4
-           \override Custos #'neutral-direction = #-1
+           \override Custos #'neutral-direction = #down
            clefGlyph = #"clefs.vaticana.do"
            clefPosition = #1
            clefOctavation = #0 

diff --git a/input/test/mensural-ligatures.ly b/input/test/mensural-ligatures.ly
index bc14e87054555226e651b446faaf59b1c95c56fb..70c9a5636e6bf3a47f43ddfe41502edaa2b9fde7 100644 (file)
--- a/input/test/mensural-ligatures.ly
+++ b/input/test/mensural-ligatures.ly
@@ -68,7 +68,7 @@ voice =  \transpose c c' {
            \override Accidental #'style = #'mensural
            \override Custos #'style = #'mensural
            \override Custos #'neutral-position = #3
-           \override Custos #'neutral-direction = #-1
+           \override Custos #'neutral-direction = #down
            clefGlyph = #"clefs.petrucci.g"
            clefPosition = #-2
            clefOctavation = #-0

diff --git a/input/test/move-specific-text.ly b/input/test/move-specific-text.ly
index 4222278bea2093e01148dfb542830a975966deef..c251f0a67270f807d2418843ba676726041cd77a 100644 (file)
--- a/input/test/move-specific-text.ly
+++ b/input/test/move-specific-text.ly
@@ -10,7 +10,7 @@ Objects, like text, can be moved around by using some Scheme code.
 
 \score {
   \relative c''' {
-    \override Stem  #'direction = #1
+    \stemUp
     \applyoutput #(outputproperty-compatibility (make-text-checker (make-simple-markup "m.d."))
       'extra-offset '(-3.5 . -4.5))
     a^2^"m.d."