Direction #1 to #up, #-1 to #down.

diff --git a/ChangeLog b/ChangeLog
index c5e6d4357f87fe6b08986f5e3407a864590ce92f..3e2e1d94efbc93b319d4e8539b1e2110daf93a13 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -5,6 +5,9 @@
 
        * Documentation/user/music-glossary.tely: #-1 to #down.
 
+       * ly/bagpipe.ly, engraver-init.ly, property-init.ly: #1
+       to #up, #-1 to #down.
+
 2005-08-18  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
        * lily/include/engraver-group.hh: rename.

diff --git a/ly/bagpipe.ly b/ly/bagpipe.ly
index f2736f0218b32dbd9a54c685774acc895bd300a1..b1bc4fb5b598ed41f6503a00221029a7444d5cbf 100755 (executable)
--- a/ly/bagpipe.ly
+++ b/ly/bagpipe.ly
@@ -6,7 +6,7 @@
   Sven Axelsson, the Murray Pipes & Drums of Gothenburg
   (http://www.murrays.nu)
   
-  $Id: bagpipe.ly,v 1.2 2005/08/04 23:32:42 gpercival Exp $
+  $Id: bagpipe.ly,v 1.3 2005/08/18 22:06:45 gpercival Exp $
 %}
 
 \version "2.6.0"
@@ -57,10 +57,10 @@ showKeySignature = {
   \context {
     \Voice
     % All stems go down.
-    \override Stem #'direction = #-1
+    \stemDown
     % All slurs and ties are on top.
-    \override Slur #'direction = #1
-    \override Tie #'direction = #1
+    \slurUp
+    \tieUp
   }
 }
 

diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
index b46432122f55b8eb432d1f074bcb58e2700ded75..4e71e03f751402d0cf37a2752b2888ad8fc6a576 100644 (file)
--- a/ly/engraver-init.ly
+++ b/ly/engraver-init.ly
@@ -132,8 +132,8 @@ contained staves are not connected vertically."
   \override VoltaBracket #'padding = #5
   \override StaffSymbol #'line-count = #1      
 
-  \override Stem  #'neutral-direction = #1
-  \override Beam  #'neutral-direction = #1
+  \override Stem  #'neutral-direction = #up
+  \override Beam  #'neutral-direction = #up
   
   \consists "Output_property_engraver"
   \consists "Font_size_engraver"
@@ -756,7 +756,7 @@ AncientRemoveEmptyStaffContext = \context {
   \override Accidental #'style = #'vaticana
   \override Custos #'style = #'vaticana
   \override Custos #'neutral-position = #3
-  \override Custos #'neutral-direction = #-1
+  \override Custos #'neutral-direction = #down
 
   %% Score.timing = ##f
   %% Score.barAlways = ##t
@@ -861,7 +861,7 @@ AncientRemoveEmptyStaffContext = \context {
   \override Accidental #'style = #'mensural
   \override Custos #'style = #'mensural
   \override Custos #'neutral-position = #3
-  \override Custos #'neutral-direction = #-1
+  \override Custos #'neutral-direction = #down
 
   %% Score.timing = ##f
   %% Score.barAlways = ##t

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 71076e5f7baa231833a1de52311f8a13b9c4fcce..d13f9a4bb3a1986350b91dce814f65c8bf56709c 100644 (file)
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -2,12 +2,12 @@
 
 \version "2.6.0"
 
-stemUp = \override Stem  #'direction = #1
-stemDown = \override Stem  #'direction = #-1 
+stemUp = \override Stem  #'direction = #up
+stemDown = \override Stem  #'direction = #down 
 stemNeutral= \revert Stem #'direction
 
-slurUp = \override Slur  #'direction = #1
-slurDown = \override Slur  #'direction = #-1
+slurUp = \override Slur  #'direction = #up
+slurDown = \override Slur  #'direction = #down
 slurNeutral = \revert Slur #'direction 
 
 %% There's also dash, but setting dash period/length should be fixed.
@@ -25,8 +25,8 @@ slurSolid = {
 }
 
 
-phrasingSlurUp = \override PhrasingSlur  #'direction = #1
-phrasingSlurDown = \override PhrasingSlur  #'direction = #-1
+phrasingSlurUp = \override PhrasingSlur  #'direction = #up
+phrasingSlurDown = \override PhrasingSlur  #'direction = #down
 phrasingSlurNeutral = \revert PhrasingSlur #'direction 
 
 shiftOn = \override NoteColumn  #'horizontal-shift = #1
@@ -34,8 +34,8 @@ shiftOnn = \override NoteColumn  #'horizontal-shift = #2
 shiftOnnn = \override NoteColumn  #'horizontal-shift = #3
 shiftOff = \revert NoteColumn #'horizontal-shift 
 
-tieUp = \override Tie  #'direction = #1
-tieDown = \override Tie  #'direction = #-1
+tieUp = \override Tie  #'direction = #up
+tieDown = \override Tie  #'direction = #down
 tieNeutral = \revert Tie #'direction 
 
 tieDashed = {
@@ -64,13 +64,13 @@ sacredHarpHeads =
   \set shapeNoteStyles = ##(#f #f mi #f fa la #f)
 
 dynamicUp = {
-  \override DynamicText  #'direction = #1
-  \override DynamicLineSpanner  #'direction = #1
+  \override DynamicText  #'direction = #up
+  \override DynamicLineSpanner  #'direction = #up
 }
 
 dynamicDown = {
-  \override DynamicText  #'direction = #-1
-  \override DynamicLineSpanner  #'direction = #-1
+  \override DynamicText  #'direction = #down
+  \override DynamicLineSpanner  #'direction = #down
 }
 
 dynamicNeutral = {
@@ -79,12 +79,12 @@ dynamicNeutral = {
 }
 
 
-dotsUp = \override Dots  #'direction = #1
-dotsDown = \override Dots  #'direction = #-1
+dotsUp = \override Dots  #'direction = #up
+dotsDown = \override Dots  #'direction = #down
 dotsNeutral = \revert Dots #'direction 
 
-tupletUp = \override TupletBracket  #'direction = #1
-tupletDown = \override TupletBracket  #'direction = #-1
+tupletUp = \override TupletBracket  #'direction = #up
+tupletDown = \override TupletBracket  #'direction = #down
 tupletNeutral = \revert TupletBracket #'direction
 
 cadenzaOn = \set Timing.timing = ##f
@@ -140,11 +140,11 @@ arpeggio = #(make-music 'ArpeggioEvent)
 
 arpeggioUp = \sequential {
   \revert Arpeggio  #'print-function
-  \override Arpeggio  #'arpeggio-direction = #1
+  \override Arpeggio  #'arpeggio-direction = #up
 }
 arpeggioDown = \sequential {
   \revert Arpeggio  #'print-function
-  \override Arpeggio  #'arpeggio-direction = #-1
+  \override Arpeggio  #'arpeggio-direction = #down
 }
 arpeggioNeutral = \sequential {
   \revert Arpeggio  #'print-function
@@ -207,7 +207,7 @@ improvisationOff =  {
     \revert NoteHead #'style
 }
 
-textSpannerUp = \override TextSpanner #'direction = #1
-textSpannerDown = \override TextSpanner #'direction = #-1
+textSpannerUp = \override TextSpanner #'direction = #up
+textSpannerDown = \override TextSpanner #'direction = #down
 textSpannerNeutral = \revert TextSpanner #'direction