patch::: 1.4.1.jcn2

[lilypond.git] / ly / property.ly

diff --git a/ly/property.ly b/ly/property.ly
index 5a413798b6d1b4652964360c1bd3fcd9de9bd1f1..1ebe98c91876529c64a9cd37f12cfd44ad48d666 100644 (file)
--- a/ly/property.ly
+++ b/ly/property.ly
@@ -1,9 +1,9 @@
 % property.ly
 
-\version "1.3.110";
+\version "1.3.146"
 
-stemUp = \property Voice.Stem \override #'direction = #1
-stemDown = \property Voice.Stem \override #'direction = #-1 
+stemUp = \property Voice.Stem \set #'direction = #1
+stemDown = \property Voice.Stem \set #'direction = #-1 
 stemBoth= \property Voice.Stem \revert #'direction
 
 slurUp   = \property Voice.Slur \override #'direction = #1
@@ -44,6 +44,20 @@ scriptBoth = {
   \property Voice.Script \revert #'direction
 }
 
+tupletUp  = {
+  \property Voice.TupletBracket \override #'direction = #1
+  \property Voice.TupletBracket \override #'direction = #1
+}
+tupletDown = {
+  \property Voice.TupletBracket \override #'direction = #-1
+  \property Voice.TupletBracket \override #'direction = #-1
+}
+tupletBoth = {
+  \property Voice.TupletBracket \revert #'direction
+  \property Voice.TupletBracket \revert #'direction
+}
+
+
 
 cadenzaOn = \property Score.timing = ##f
 cadenzaOff = {
@@ -51,6 +65,13 @@ cadenzaOff = {
   \property Score.measurePosition = #(make-moment 0 1)
 }
 
+newpage = {
+  \break
+  % urg, only works for TeX output
+  \context Score \outputproperty #(make-type-checker 'paper-column-interface)
+    #'between-system-string = #"\\newpage"
+}
+
 % dynamic dir?  text script, articulation script dir?  
 oneVoice = {   
   \stemBoth
@@ -114,10 +135,10 @@ specialkey = {
 
 % End the incipit and print a ``normal line start''.
 endincipit = \notes{
-    \partial 16; s16  % Hack to handle e.g. \bar ".|"; \endincipit
+    \partial 16 s16  % Hack to handle e.g. \bar ".|" \endincipit
     \context Staff \outputproperty #(make-type-checker 'clef-interface) #'full-size-change = ##t
     \context Staff \outputproperty #(make-type-checker 'clef-interface) #'non-default = ##t
-    \bar "";
+    \bar ""
 }
 
 autoBeamOff = \property Voice.noAutoBeaming = ##t
@@ -126,8 +147,8 @@ autoBeamOn = \property Voice.noAutoBeaming = ##f
 emptyText = \property Voice.textNonEmpty = ##f
 fatText = \property Voice.textNonEmpty = ##t
 
-showStaffSwitch = \property Thread.followThread = ##t
-hideStaffSwitch = \property Thread.followThread = ##f
+showStaffSwitch = \property PianoStaff.followVoice = ##t
+hideStaffSwitch = \property PianoStaff.followVoice = ##f
 
 
 % To remove a Volta bracet or some other graphical object,