*** empty log message ***

diff --git a/ChangeLog b/ChangeLog
index 35aec5feaf042d6c3c52a96f41160e914a61e38b..9353077408b996de155b7777497ef026c88e747b 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,6 @@
 2006-02-13  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
-       * THANKS: add Don.
+`      * THANKS: add Don.
 
        * lily/slur-scoring.cc (get_base_attachments): use
        robust_relative_extent. This fixes problems with empty paper-columns. 

diff --git a/VERSION b/VERSION
index b9d81808daf1cff6fb0e0bbbf6cf8a75b2440815..3affc7dd973046e058b844d1c11a63d81ff4f128 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -1,6 +1,6 @@
 PACKAGE_NAME=LilyPond
 MAJOR_VERSION=2
 MINOR_VERSION=7
-PATCH_LEVEL=33
+PATCH_LEVEL=34
 MY_PATCH_LEVEL=
 

diff --git a/input/bach-schenker.ly b/input/bach-schenker.ly
index bafec344beaeb9188a924dd3529b3a07573de223..64f3ed902c8ec61a23540204d0d68ca8fa0c8698 100644 (file)
--- a/input/bach-schenker.ly
+++ b/input/bach-schenker.ly
@@ -21,7 +21,7 @@ staffPiano = \new PianoStaff {
   \set PianoStaff.followVoice = ##t
 
   <<
-    \context Staff = "RH" {  % Right hand 
+    \new Staff {  % Right hand 
       \clef treble
       \key g \major
       \relative c'' {
@@ -147,7 +147,7 @@ staffPiano = \new PianoStaff {
       \bar "|."
     }
   }
-   \context Staff = "LH" {  % Left hand                        
+   \new Staff {  % Left hand                   
      \clef bass
      \key g \major
      \relative c' {

diff --git a/input/les-nereides.ly b/input/les-nereides.ly
index a9e367f27f6963f2d5523a71f1c820c1de4cf7d1..226a8c3de2e9aef1592f934235d5d093aca69ae8 100644 (file)
--- a/input/les-nereides.ly
+++ b/input/les-nereides.ly
@@ -240,14 +240,14 @@ middleDynamics = {
 
 theScore = \score{
     \context PianoStaff <<
-        \context Staff = "treble" <<
+        \new Staff = "treble" <<
            \treble
            \trebleTwo
         >>
        \new Dynamics <<
            \middleDynamics
        >>
-        \context Staff = "bass" <<
+        \new Staff = "bass" <<
            \clef bass
            \bass
            \bassTwo

diff --git a/input/mutopia/E.Satie/petite-ouverture-a-danser.ly b/input/mutopia/E.Satie/petite-ouverture-a-danser.ly
index 0b344044e71a2436051b5e59679cfc9e56c86c6e..3cf0aa2ff8ad6d8eb5c357ff3c952b11b811bdf9 100644 (file)
--- a/input/mutopia/E.Satie/petite-ouverture-a-danser.ly
+++ b/input/mutopia/E.Satie/petite-ouverture-a-danser.ly
@@ -30,8 +30,7 @@ global =  {
   \bar "|."
 }
   
-i = \context Staff \relative c''{
-  \context Voice = "i"
+i = \context Staff \relative c''\new Voice {
   \voiceOne
 
   c8.( es16 bes4 ~ |  bes8) r c8.( bes16 | des4 c8. bes16 | c4 ~  c8) r |
@@ -58,8 +57,7 @@ i = \context Staff \relative c''{
   
 }
 
-ii = \context Staff \relative c'{
-  \context Voice = "ii"
+ii = \context Staff \relative c'\new Voice{
   \voiceTwo
 
   r8 <es as> r <des f> | r <es g> r <es as> | r <f as> r <f as> |
@@ -96,8 +94,7 @@ ii = \context Staff \relative c'{
  
 }
 
-lower = \context Staff  \relative c{
-  \context Voice = "iii"
+lower = \context Staff  \relative c \new Voice{
 
   <as as'>4 <es es'> | r <as as'> | <des, des'> <f f'> | <c c'> r |
   <as as'> <des des'> | <bes bes'> r | <des des'> <bes bes'> |
@@ -126,13 +123,13 @@ lower = \context Staff  \relative c{
 
 \score {
     \context PianoStaff <<
-       \context Staff = "treble" << 
+       \new Staff = "treble" << 
            \global 
            \clef violin
            \i
            \ii
        >>
-       \context Staff = "bass" <<
+       \new Staff = "bass" <<
            \global
            \clef bass
            \lower

diff --git a/input/mutopia/F.Schubert/morgenlied.ly b/input/mutopia/F.Schubert/morgenlied.ly
index 4d14401521c3b253541eede5a3e499ed8f24cac3..731a483f677520088330cc1b77167449d5defc49 100644 (file)
--- a/input/mutopia/F.Schubert/morgenlied.ly
+++ b/input/mutopia/F.Schubert/morgenlied.ly
@@ -50,7 +50,7 @@ modernAccidentals = {
 }
 
 
-melody =    \relative c'' \repeat volta 2 \context Voice = "singer" {
+melody =    \relative c'' \repeat volta 2 \new Voice = "singer" {
     \time 6/8
     \autoBeamOff
     s1*0^\markup { \bold \large\bigger\bigger { \hspace #-3.0 Lieblich, etwas geschwind } }

diff --git a/input/mutopia/F.Schubert/standchen.ly b/input/mutopia/F.Schubert/standchen.ly
index 321d71602c806d04afd68bd645c9dc550f72ed59..4f14b8eb0d1fb58eebe8c3c0130bd2c73c823ebe 100644 (file)
--- a/input/mutopia/F.Schubert/standchen.ly
+++ b/input/mutopia/F.Schubert/standchen.ly
@@ -381,7 +381,7 @@ allLyrics = {
            \lyricThrough 
 } }
 
-vocals = \context Voice = "leise"  {
+vocals = \new Voice =  "leise"  {
        \clef treble
        % certainly no auto-beaming for vocals
        \autoBeamOff
@@ -396,7 +396,7 @@ vocals = \context Voice = "leise"  {
        R1 * 3/4 * 6
 }
 
-trebleStaff = \context Staff = "treble"<< 
+trebleStaff = \new Staff =  "treble"<< 
         \set Staff.midiInstrument = "acoustic grand"
        \global
        {
@@ -410,7 +410,7 @@ trebleStaff = \context Staff = "treble"<<
        }
 >>
 
-bassStaff = \context Staff = "bass"<<
+bassStaff = \new Staff =  "bass"<<
         \set Staff.midiInstrument = "acoustic grand"
        \global
        \clef bass

diff --git a/input/mutopia/J.S.Bach/bwv940.ly b/input/mutopia/J.S.Bach/bwv940.ly
index 8ca4e3f3598ad45a325de1ceb2b4accc00a1aed2..1a60e954b7c64d6c1652f925024c53075a5e42d7 100644 (file)
--- a/input/mutopia/J.S.Bach/bwv940.ly
+++ b/input/mutopia/J.S.Bach/bwv940.ly
@@ -12,6 +12,8 @@
 %}
 
 
+
+
 \header{
   title =       "Praeludium"
   composer =    "Johann Sebastian Bach (1685-1750)"
@@ -136,17 +138,17 @@ global = {
 
 \score{
        % Allegretto
-       \context PianoStaff <<
-               \context Staff = "upper" <<
+       \new PianoStaff <<
+               \new Staff = "upper" <<
                        \global
-                       \context Voice = "i"\one
-                       \context Voice = "ii" \two
+                       \new Voice = "i"\one
+                       \new Voice = "ii" \two
                >>
-               \context Staff = "lower" <<
+               \new Staff = "lower" <<
                        \global
                        \clef "bass"
-                       \context Voice = "iii" \three
-                       \context Voice = "iv" \four
+                       \new Voice = "iii" \three
+                       \new Voice = "iv" \four
                >>
        >>
        \layout{

diff --git a/input/mutopia/R.Schumann/romanze-op28-2.ly b/input/mutopia/R.Schumann/romanze-op28-2.ly
index 23fed9746f16839d495163d69df50e5e9688770f..d960317fd2ca37090902578cc1804923b6a04232 100644 (file)
--- a/input/mutopia/R.Schumann/romanze-op28-2.ly
+++ b/input/mutopia/R.Schumann/romanze-op28-2.ly
@@ -83,7 +83,7 @@ righta =  \transpose c cis' {
   f) f'-5( e'-5 d'-4 c'-3  f')-5 <f^4 a^5>4( <e^3 g^5>8 |
  <a, f^4>4 <g, e^3>8 f16^4 d'^5~ d'8.[ c'16^4] |
  \forcedBreak 
- << f8)^3_\pp \context Voice = "another" { \m  a,16[ \u c8 c16] } >> \m  g,[ \u c_3] \m  b,[^\markup { \finger "2-1" } \u c8 c16] \m  a,[ \u c]~ | \stemNeutral
+ << f8)^3_\pp \new Voice =  "another" { \m  a,16[ \u c8 c16] } >> \m  g,[ \u c_3] \m  b,[^\markup { \finger "2-1" } \u c8 c16] \m  a,[ \u c]~ | \stemNeutral
  c16 c8_4 c c16~c c8_2 c c16~ |
  c16 c8 c c16~c c8 c c16~ |
  c16 c8 c c16 r4^\fermata r8 | \bar "|."
@@ -163,7 +163,7 @@ lefta =  \transpose c cis {
   g4 a8~a f g | a4 g8~g f e |
   d4 g8~g es f | g4 f8~f es d |
   c4 r8 f4 as8~ | as g b as4 ces'8~ |
-  ces' b des' c'4 \context Voice = "another" { \stemUp \tieUp <es' es>8~ |
+  ces' b des' c'4 \new Voice =  "another" { \stemUp \tieUp <es' es>8~ |
   es' des'4^1~ \stemDown  des'8.[ c'16] }
  }
  \transpose c' c, {
@@ -256,23 +256,23 @@ leftb =  \transpose c cis {
     \override PianoStaff.InstrumentName #'font-magnification = #3
     
     \set PianoStaff.instrument = "  2."
-    \context Staff = "up" {
+    \new Staff =  "up" {
       \override Staff.DynamicLineSpanner   #'direction = #DOWN
-      \clef G <<\global \context Voice = "upv" \righta >>
+      \clef G <<\global \new Voice =  "upv" \righta >>
     }
-    \context Staff = "mid" {
+    \new Staff =  "mid" {
     \override Staff.InstrumentName #'font-size = #0
     \override Staff.InstrumentName #'font-shape = #'upright
     \override Staff.InstrumentName #'font-magnification = #1
     \override Staff.InstrumentName #'extra-offset = #'(0 . 6)
    % \set Staff.instrument = "\\begin{turn}{-90}{Rechte Hand}\\end{turn}"
     \set Staff.instrument = \markup { \column { Rechte Hand }  \hspace #2 }
-      \clef F <<\global \context Voice = "midv" \rightb>>
+      \clef F <<\global \new Voice =  "midv" \rightb>>
     }
-      \context Staff = "down" {
+      \new Staff =  "down" {
         \override Staff.DynamicLineSpanner   #'direction = #UP
         \clef F
-       << \global \context Voice = "lva" \lefta \context Voice = "lvb" \leftb >>
+       << \global \new Voice \lefta \new Voice \leftb >>
     }
   >>
   \layout { 

diff --git a/input/no-notation/denneboom.ly b/input/no-notation/denneboom.ly
index 9fe6d9a365dbc87f733c1424ed642850e099d38d..dd7e80f26496b95b27c29071476f83106f4e9743 100644 (file)
--- a/input/no-notation/denneboom.ly
+++ b/input/no-notation/denneboom.ly
@@ -66,7 +66,7 @@ verseOne = {
        \oden
 }
 
-verseOneStaff = \context Lyrics = "one" 
+verseOneStaff = \new Lyrics =  "one" 
        \verseOne
 
 
@@ -77,7 +77,7 @@ verseTwo = {
        \oden
 }
 
-verseTwoStaff = \context Lyrics = "two" 
+verseTwoStaff = \new Lyrics =  "two" 
        \verseTwo
 
 

diff --git a/input/no-notation/die-staff.ly b/input/no-notation/die-staff.ly
index 6b0d8e7bc8c405c68f7eab0c16bdfb3d52afb7f2..531806abc26a0a949291709f048d11ea3444db5e 100644 (file)
--- a/input/no-notation/die-staff.ly
+++ b/input/no-notation/die-staff.ly
@@ -5,17 +5,17 @@ texidoc = "a staff should really die, if no one's referencing it."
 }
 \score {
  {
-    \context Staff = "q" {
+    \new Staff =  "q" {
        { a' b' c' d' }
     }
 
     \break
 
     \context PianoStaff <<
-      \context Staff = "i" {
+      \new Staff =  "i" {
          { a' b' c' d' }
       }
-      \context Staff = "ii" {
+      \new Staff =  "ii" {
          { \clef "bass" a b c d }
       }
     >>

diff --git a/input/no-notation/display-lily-tests.ly b/input/no-notation/display-lily-tests.ly
index 40f7b7e8cd0c280ee99038fce634c98f5a3d74c9..1585c734eb6f5b62145d71fe83f19f6f61323f3a 100644 (file)
--- a/input/no-notation/display-lily-tests.ly
+++ b/input/no-notation/display-lily-tests.ly
@@ -221,6 +221,7 @@ test = #(def-music-function (parser location result-info strings) (string? pair?
 
   %% Context creation
   \test #"" ##[ \new Staff { c d } #]                  % ContextSpeccedMusic
+  \test #"" ##[ \new Staff = "up" { c d } #]                   % ContextSpeccedMusic
   \test #"" ##[ \context Staff { c d } #]
   \test #"" ##[ \context Staff = "up" { c d } #]
   \test #"" ##[

diff --git a/input/no-notation/midi-grace.ly b/input/no-notation/midi-grace.ly
index 1afc4a235a5a7cf6490e32316234bb373351fd05..917694660cef0e338414778a4f2ccfb166759f39 100644 (file)
--- a/input/no-notation/midi-grace.ly
+++ b/input/no-notation/midi-grace.ly
@@ -4,7 +4,7 @@
 
 \score { 
   \context Voice \relative c {
-    \context Voice=VoiceOne
+    \new Voice = VoiceOne
        \grace {
   \override Stem  #'stroke-style = #"grace"
    c8 

diff --git a/input/no-notation/midi-lyric-barcheck.ly b/input/no-notation/midi-lyric-barcheck.ly
index 62d8e76dae058a23f62467d89bde8cfb1b64ecba..3514a860e1f6fa450c207f5da42afa514cdfc9ce 100644 (file)
--- a/input/no-notation/midi-lyric-barcheck.ly
+++ b/input/no-notation/midi-lyric-barcheck.ly
@@ -9,7 +9,7 @@ this examples causes no bar checks in MIDI.
     }
 \score {
 
-    <<\relative c'' \context Voice = A {
+    <<\relative c'' \new Voice =  A {
        \autoBeamOff
        c8[ c] c2.
        c1~c4 c2.

diff --git a/input/no-notation/midi-volume-equaliser.ly b/input/no-notation/midi-volume-equaliser.ly
index f6d2c2dbd40e984ea0a99ed74b1fee6ceca6da88..60259c5ba6b0359d5ac6bf849a5519bfc9307a9e 100644 (file)
--- a/input/no-notation/midi-volume-equaliser.ly
+++ b/input/no-notation/midi-volume-equaliser.ly
@@ -117,31 +117,31 @@ violoncello =  \relative c' {
 
 \score {
   << 
-    \context StaffGroup ="legni" << 
-      \context Staff ="flauti" \flauti
-      \context Staff ="oboi" \oboi
-      \context Staff ="clarinetti" \clarinetti 
-      \context Staff ="fagotti" \fagotti 
+    \new StaffGroup = "legni" << 
+      \new Staff = "flauti" \flauti
+      \new Staff = "oboi" \oboi
+      \new Staff = "clarinetti" \clarinetti 
+      \new Staff = "fagotti" \fagotti 
     >>
-    \context StaffGroup ="ottoni" <<
-      \context Staff ="corni" \corni
-      \context Staff ="trombe" \trombe
+    \new StaffGroup = "ottoni" <<
+      \new Staff = "corni" \corni
+      \new Staff = "trombe" \trombe
     >>
-    \context StaffGroup ="timpani" <<
-      \context Staff ="timpani" \timpani
+    \new StaffGroup = "timpani" <<
+      \new Staff = "timpani" \timpani
      { 
        \skip 1 
        % Hmm: this forces a staff-bracket, that's good!
        % However, I can't find where is decided on staff-bracket yes/no
      }
     >>
-    \context StaffGroup ="archi" <<
-      \context GrandStaff ="violini" <<
-        \context Staff ="violino1" \violinoI
-        \context Staff ="violino2" \violinoII
+    \new StaffGroup = "archi" <<
+      \new GrandStaff = "violini" <<
+        \new Staff = "violino1" \violinoI
+        \new Staff = "violino2" \violinoII
       >>
-      \context Staff ="viola" \viola
-      \context Staff ="violoncello" \violoncello
+      \new Staff = "viola" \viola
+      \new Staff = "violoncello" \violoncello
     >>
   >>
 

diff --git a/input/puer-fragment.ly b/input/puer-fragment.ly
index bdb7fa86f4aab979f3522a4edf42b0c651e85879..c378c2ed73296350bf480e2ef8fedd13cab156ce 100644 (file)
--- a/input/puer-fragment.ly
+++ b/input/puer-fragment.ly
@@ -24,7 +24,7 @@ before the ligature (not demonstrated in this example)."
 %%% but this is intentional for editorial purposes (simplifies some
 %%% global search/replace operations in emacs).
 
-cantus = \context VaticanaVoice = "cantus"  {
+cantus = \new VaticanaVoice = "cantus"  {
   \[ g4\melisma %%% Pu-
     \pes
     d'\melismaEnd
@@ -75,7 +75,7 @@ cantus = \context VaticanaVoice = "cantus"  {
   \divisioMaxima
 }
 
-verba = \context Lyrics = "verba" \lyricmode {
+verba = \new Lyrics = "verba" \lyricmode {
   Pu -- er na -- tus est no -- bis,
   et fi -- li -- us da -- tus est no -- bis:
 }

diff --git a/input/regression/accidental-double.ly b/input/regression/accidental-double.ly
index 451305fdc79fef070b5d174d86873ebc0b01eb38..a1f31cc6f0be040ff6842e2a77821dd6c8a98f28 100644 (file)
--- a/input/regression/accidental-double.ly
+++ b/input/regression/accidental-double.ly
@@ -9,8 +9,8 @@
 \transpose c c'
 \context Staff <<
   \key g \major
-  \context Voice = "va" { \stemUp c' fis! }
-  \context Voice = "vb" { \stemDown c fis! }
+  \new Voice { \stemUp c' fis! }
+  \new Voice { \stemDown c fis! }
 >>
 
 

diff --git a/input/regression/alignment-order.ly b/input/regression/alignment-order.ly
index 3fb5d76e72faff82a556f9fb20e7c97873eadde9..2e0eb83ac45811efe927faa841d92c61f77c30a3 100644 (file)
--- a/input/regression/alignment-order.ly
+++ b/input/regression/alignment-order.ly
@@ -10,9 +10,9 @@ anywhere in the vertical alignment. "
 }
 
 \relative <<
-  \context Staff = "1" { c4 c s2 }
-  \context Staff = "2" { c4  c s2 }
-  \context Staff = "3" { c4  c s2 }
+  \new Staff = "1" { c4 c s2 }
+  \new Staff = "2" { c4  c s2 }
+  \new Staff = "3" { c4  c s2 }
   { \skip 2
     <<
       \lyrics {

diff --git a/input/regression/auto-change.ly b/input/regression/auto-change.ly
index 14ab804e6a55c3c679cf098ac46deccde6fd554e..f72c8fa0ba78a4c20bce8b80adde7cff80e9b572 100644 (file)
--- a/input/regression/auto-change.ly
+++ b/input/regression/auto-change.ly
@@ -12,10 +12,10 @@ note. When central C is reached, staff is not yet switched (by default).
 \layout { ragged-right= ##t }
 
 \context PianoStaff <<
-  \context Staff = "up" {
-    \autochange  \context Voice = VA << \relative c' { g4 c e d c r4 a g } >>
+  \new Staff = "up" {
+    \autochange  \new Voice << \relative c' { g4 c e d c r4 a g } >>
   }
-  \context Staff = "down" {
+  \new Staff = "down" {
     \clef bass 
     s1*2
   }

diff --git a/input/regression/beam-cross-staff-auto-knee.ly b/input/regression/beam-cross-staff-auto-knee.ly
index 85fe59300d09688cc44e93497cf641884876dfaa..7a433135ebdf4db6f375436beab9bd807af19e3d 100644 (file)
--- a/input/regression/beam-cross-staff-auto-knee.ly
+++ b/input/regression/beam-cross-staff-auto-knee.ly
@@ -13,12 +13,12 @@ produced with explicit staff switches)."
 }
 
 \context PianoStaff <<
-  \context Staff = "up" \relative c''{
+  \new Staff = "up" \relative c''{
     b8[ \change Staff="down" d,, ]
     c[ \change Staff="up" c'' ]
     b,[ \change Staff="down" d^"no knee" ]
   }
-  \context Staff = "down" {
+  \new Staff = "down" {
     \clef bass 
     s2.
   }

diff --git a/input/regression/beam-cross-staff-slope.ly b/input/regression/beam-cross-staff-slope.ly
index 71814b3949b2c9376c3d471bdacce30f7e893a94..157eb724579ad8bc3c0ed4f2b8797a8605f86b7e 100644 (file)
--- a/input/regression/beam-cross-staff-slope.ly
+++ b/input/regression/beam-cross-staff-slope.ly
@@ -6,7 +6,7 @@
 \layout { ragged-right = ##t}
 
 \context PianoStaff <<
-  \context Staff = "up"
+  \new Staff = "up"
   \relative c'' <<
     {
       \stemDown
@@ -25,7 +25,7 @@
       
     } \\
   >>
-  \context Staff = "down" {
+  \new Staff = "down" {
     \time 3/8 \clef bass s4.*3 }
 >>
 

diff --git a/input/regression/beam-cross-staff.ly b/input/regression/beam-cross-staff.ly
index f0417f975e6b86af49d96b8a10bd00161282a8f3..d1b5a8190001bd761bc79f89fc6c15f0d9de0959 100644 (file)
--- a/input/regression/beam-cross-staff.ly
+++ b/input/regression/beam-cross-staff.ly
@@ -9,7 +9,7 @@ behave well, wherever the switching point is.
 }
 
 \context PianoStaff <<
-  \context Staff = "one" \relative c'{
+  \new Staff = "one" \relative c'{
     \stemUp  c8[ c \change Staff=two \stemUp c c]
     c[ c c c]
     \change Staff=one
@@ -21,7 +21,7 @@ behave well, wherever the switching point is.
     \stemUp  c8[ c \change Staff=one \stemDown c c]
     r2
   }
-  \context Staff = "two" \relative c'{
+  \new Staff = "two" \relative c'{
     \clef bass
     s1
     s1

diff --git a/input/regression/beam-isknee.ly b/input/regression/beam-isknee.ly
index cb99101c38e040c909f37b2702d2afa8152f5ce0..771b49cb842f6691874c33306870581cca1e8e61 100644 (file)
--- a/input/regression/beam-isknee.ly
+++ b/input/regression/beam-isknee.ly
@@ -14,10 +14,10 @@ Beams can be placed across a @code{PianoStaff}.
 }
 
 \context PianoStaff <<
-  \context Staff = "one" \relative c'{
+  \new Staff =  "one" \relative c'{
     s1
   }
-  \context Staff = "two" \relative c'{
+  \new Staff =  "two" \relative c'{
     \clef bass
                                % no knee
     \stemUp  c8[ \change Staff=one \stemDown g'16 f]

diff --git a/input/regression/beam-multiple-cross-staff.ly b/input/regression/beam-multiple-cross-staff.ly
index 07500e00036630eec93fdc8f747ef35b8545dcee..8f8a87a6bc9ae0787384c8789760e773ca6cc2bd 100644 (file)
--- a/input/regression/beam-multiple-cross-staff.ly
+++ b/input/regression/beam-multiple-cross-staff.ly
@@ -13,13 +13,13 @@ to the last beam.
 }
 
 \context PianoStaff \relative c' <<
-  \context Staff = SA {
+  \new Staff = SA {
     \stemDown
     c8[ c16 \change Staff = SB \stemUp c16 ]
     \stemNeutral
     f[ g \change Staff = SA a c] 
   }
-  \context Staff = SB \relative c' {
+  \new Staff = SB \relative c' {
     \clef bass
     b8[ b16 \stemUp b,,16 ]
 

diff --git a/input/regression/cluster-cross-staff.ly b/input/regression/cluster-cross-staff.ly
index c42385c256a14d4061e4da63637a159a3649073b..97f6613c477eebd71444b9128bf97d1228cd0a46 100644 (file)
--- a/input/regression/cluster-cross-staff.ly
+++ b/input/regression/cluster-cross-staff.ly
@@ -10,10 +10,10 @@
 \version "2.7.32"
 
 \new PianoStaff <<
-  \context Staff = "up"     {
+  \new Staff = "up"     {
     s1 *2
   }
-  \context Staff = "down" <<
+  \new Staff = "down" <<
     \applyMusic #notes-to-clusters \relative c  { <c e>4 <f a> <b e> \change Staff = up <e a>
                                                  <a d> <d g> }
 

diff --git a/input/regression/follow-voice-break.ly b/input/regression/follow-voice-break.ly
index 8ba853a129832030aceebe8fd429424dfda1f7d2..e7b0b9837bc26654158a695aa214978d2dc482ca 100644 (file)
--- a/input/regression/follow-voice-break.ly
+++ b/input/regression/follow-voice-break.ly
@@ -15,12 +15,12 @@ printed.
 
 \context PianoStaff <<
   \set PianoStaff.followVoice = ##t        
-  \context Staff = "one" \relative c''{
+  \new Staff = "one" \relative c''{
     a1 \break
     \change Staff=two
     a,
   }
-  \context Staff = "two" { \clef bass \skip 1*2 }
+  \new Staff = "two" { \clef bass \skip 1*2 }
 >>
 
 

diff --git a/input/regression/fret-diagrams.ly b/input/regression/fret-diagrams.ly
index 6d0a7842ccfe76e68f6d6e99211820b123adfd91..32ee2fd8985433a558f14e75e71366a56fdc78b1 100644 (file)
--- a/input/regression/fret-diagrams.ly
+++ b/input/regression/fret-diagrams.ly
@@ -13,7 +13,7 @@
 <<
   \chords {s2 c c c d}
   
-  \context Voice=mel {
+  \new Voice =mel {
 
     %% A chord for ukelele
     a'2 ^\markup

diff --git a/input/regression/glissando.ly b/input/regression/glissando.ly
index 3eced93ace0d19d779e2af2f2ddf139c8d4271bc..28fb9d87aa7844ff57c165aa5aa633a04a755e4f 100644 (file)
--- a/input/regression/glissando.ly
+++ b/input/regression/glissando.ly
@@ -12,7 +12,7 @@ The engraver does no time-keeping, so it involves some trickery to get
 }
 
 
-\context Staff = "one" \relative c''{
+\new Staff \relative c''{
                                % gliss non gliss and 
   c4 \glissando d e \glissando f \glissando \break
                                % consecutive 
@@ -22,9 +22,10 @@ The engraver does no time-keeping, so it involves some trickery to get
   \override Glissando  #'style = #'zigzag
   c4 \glissando c,, \glissando c' \glissando d
 }
+
 \layout{
-  line-width = 50.\mm indent = 0
- 
+  line-width = 50.\mm
+  indent = 0
 }
 
 

diff --git a/input/regression/grace.ly b/input/regression/grace.ly
index 9236991865dc4002bffa55c6c118d787b8631812..fd7c290a4a22d9dda1f28de0fcc2fd33be2d4fc1 100644 (file)
--- a/input/regression/grace.ly
+++ b/input/regression/grace.ly
@@ -14,7 +14,7 @@ Main note scripts do not end up on the grace note.
 
 \layout {ragged-right = ##t}
 
-\context Voice = VA \relative c'' {
+\new Voice \relative c'' {
   \grace b8 c4\fermata
   \grace {  c32[ cis32] } gis4
   \grace {  cis32[ dis32] } e4

diff --git a/input/regression/instrument-name.ly b/input/regression/instrument-name.ly
index 2d1efa61517de633c02c86c38f9b197a2284b981..43d67de2a5ad6f149d8ea60f542271c201e86f18 100644 (file)
--- a/input/regression/instrument-name.ly
+++ b/input/regression/instrument-name.ly
@@ -19,10 +19,10 @@ PianoStaff.
 
 \new StaffGroup <<
   \context PianoStaff <<
-    \context Staff = "treble"    {
+    \new Staff    {
       \set PianoStaff.instrument = "Piano"
       \set Staff.instrument = "Right" { c''4 }}
-    \context Staff = "bass" {
+    \new Staff {
       \set Staff.instrument = "Left"
       \clef bass c4
     }

diff --git a/input/regression/lyric-combine-new.ly b/input/regression/lyric-combine-new.ly
index 7e72bcfd5cbdecfb5e9b67da9ff7eb0aa0eeed63..80f14916c0da1180ae2b54c0640564e0133e3576 100644 (file)
--- a/input/regression/lyric-combine-new.ly
+++ b/input/regression/lyric-combine-new.ly
@@ -9,7 +9,7 @@
 
 
 <<
-  \context Voice = "bla" \relative c'' {
+  \new Voice = "bla" \relative c'' {
     \autoBeamOff
     c2( d4) e8[ c b c] f4
   }

diff --git a/input/regression/lyric-combine-polyphonic.ly b/input/regression/lyric-combine-polyphonic.ly
index 91f9801e37543ff6aa6ed9e8a3fe782c3e0b9f71..e078a3e4b8e3124d7a53f0c6c110b8b8fc8a8e79 100644 (file)
--- a/input/regression/lyric-combine-polyphonic.ly
+++ b/input/regression/lyric-combine-polyphonic.ly
@@ -16,12 +16,12 @@
     \lyricsto "one"  \new Lyrics  {
       Do mi nus ex
     }
-    \context Voice = "one" {
+    \new Voice = "one" {
       \voiceOne
       bes'4 bes'4
       bes'4 bes'4
     }
-    \context Voice = "two" {
+    \new Voice = "two" {
       \voiceTwo
       ees'8 r8 r8 r8 ees' r8 r8 r8 
     }

diff --git a/input/regression/lyric-extender-broken.ly b/input/regression/lyric-extender-broken.ly
index 388d066c8ed700916b41bec5df13b6d6aa361dd4..fce2953446a8c744b8098278afa56d7c8d4d1d90 100644 (file)
--- a/input/regression/lyric-extender-broken.ly
+++ b/input/regression/lyric-extender-broken.ly
@@ -10,7 +10,7 @@ of the melisma."
 
 
 << 
-  \context Voice=A  {
+  \new Voice =A  {
     a1 ( a1 \break
     a) a2( b) \break
     a2 

diff --git a/input/regression/lyric-phrasing.ly b/input/regression/lyric-phrasing.ly
index 0ab67dd364d66f82ab3af7a9fcf643932890df08..87f4304eee96dd83762bd0329114e919e26b4ed1 100644 (file)
--- a/input/regression/lyric-phrasing.ly
+++ b/input/regression/lyric-phrasing.ly
@@ -14,7 +14,7 @@
 
 
 <<
-  \relative c' \context Voice = "bla" {
+  \relative c' \new Voice = "bla" {
     \autoBeamOff
     c4( c16 d c b)  c4
     d16[ e f g]

diff --git a/input/regression/lyrics-bar.ly b/input/regression/lyrics-bar.ly
index 74eed40f876c14e218b0bd561c563a8b97e7f725..4f29303dbd13f785fc9682c4271fa148cc98c0c0 100644 (file)
--- a/input/regression/lyrics-bar.ly
+++ b/input/regression/lyrics-bar.ly
@@ -12,7 +12,7 @@ lyrics do not collide with barlines.
 }
 
 <<
-    \context Staff = "foo" \with
+    \new Staff \with
     {
 %      \remove "Bar_engraver"  
        }
@@ -29,7 +29,7 @@ lyrics do not collide with barlines.
     \lyrics {
        no Bar_Engraver_Bar_Engraver_Bar_Engraver 
     }
-    \context Staff = "bar" \with {
+    \new Staff \with {
 %              \remove "Bar_engraver"  
     } { b1 b1 }
 >>

diff --git a/input/regression/multi-measure-rest-spacing.ly b/input/regression/multi-measure-rest-spacing.ly
index a60fef8645f825b7297347b3c5f724d0c4663268..a292e39ecc3bef90745de4fe3ad174b42112c9d4 100644 (file)
--- a/input/regression/multi-measure-rest-spacing.ly
+++ b/input/regression/multi-measure-rest-spacing.ly
@@ -13,7 +13,7 @@ extra spacing column is created. This should not cause problems."
 
 <<
   \set Score.skipBars = ##t
-  \context Staff = "flute"  \new Voice { 
+  \new Staff \new Voice { 
     <<  { R1*40 }  { s1*0_"bla" }>> 
   }
 >>

diff --git a/input/regression/note-line.ly b/input/regression/note-line.ly
index 0f0ac0ea55df804bcdf8e5d98face889fe47a88a..f4e66639b1eadf4af4d2cc0dc09bfd5166c23dce 100644 (file)
--- a/input/regression/note-line.ly
+++ b/input/regression/note-line.ly
@@ -11,13 +11,13 @@ sd = { \change Staff = down}
 
 \context PianoStaff
 <<
-  \context Staff = "up"   {
+  \new Staff = "up"   {
     \set PianoStaff.connectArpeggios = ##t
     \showStaffSwitch
     \clef F
     c4 d \sd b a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
   }
-  \context Staff = "down" {
+  \new Staff = "down" {
     \clef F s1*4
   }
 >>

diff --git a/input/regression/quote-cyclic.ly b/input/regression/quote-cyclic.ly
index e18f678706fc4fe2a26b4514185d088d130c0b73..094de9a1bb3a36592485acc7a9f154f56e4e2374 100644 (file)
--- a/input/regression/quote-cyclic.ly
+++ b/input/regression/quote-cyclic.ly
@@ -17,6 +17,6 @@ B = \relative c' { \cueDuring #"qA" #1 { R1 } | f4 e d c  | }
 \layout { ragged-right = ##t }
 
 <<
-    \context Staff = "A" \A
-    \context Staff = "B" \B
+    \new Staff \A
+    \new Staff \B
 >>

diff --git a/input/regression/slur-cross-staff.ly b/input/regression/slur-cross-staff.ly
index e1ef90fee336b14bdde2a450f5ed1aad3358081a..55a27bc8a11d9aeb0ab46f7cb6391b29c4fcfade 100644 (file)
--- a/input/regression/slur-cross-staff.ly
+++ b/input/regression/slur-cross-staff.ly
@@ -9,7 +9,7 @@ Slurs behave decently when broken across a linebreak.
 
 
 \context PianoStaff <<
-  \context Staff = "one" \relative c'{
+  \new Staff = "one" \relative c'{
     \stemUp \slurUp
     c4( c \change Staff=two c  c) |
     \change Staff=one
@@ -39,7 +39,7 @@ Slurs behave decently when broken across a linebreak.
     c4( \change Staff=one c c \change Staff=two  c)
     r1
   }
-  \context Staff = "two" \relative c'{
+  \new Staff = "two" \relative c'{
     \clef bass
     s1 s1 s1 s1 s1 s1 s1 s1 s1 s1
   }

diff --git a/input/regression/span-bar-break.ly b/input/regression/span-bar-break.ly
index 233de803d77af93b1079923e7713e053057d83cf..345273c9a4def73ff1f24687173d9821db102700 100644 (file)
--- a/input/regression/span-bar-break.ly
+++ b/input/regression/span-bar-break.ly
@@ -11,11 +11,11 @@ barline is drawn between the staves, but the @code{:|} is not."
 
 
 \new PianoStaff <<
-  \context Staff = "up" {
+  \new Staff = "up" {
     \bar "|:" r1
     \bar ":|" \break r1
   }
-  \context Staff = "down" { r r }
+  \new Staff = "down" { r r }
 >>
 
 

diff --git a/input/regression/voice-follower.ly b/input/regression/voice-follower.ly
index 228b43982ba71462ad0f72b9d3e5c04ac1b5d27e..0e04f36b65d6ec2e3897dab8b63996672e04cd48 100644 (file)
--- a/input/regression/voice-follower.ly
+++ b/input/regression/voice-follower.ly
@@ -16,12 +16,12 @@ can be printed automatically. This is enabled if the property
 \relative c'
 \context PianoStaff <<
   \set PianoStaff.followVoice = ##t
-  \context Staff = "one" \context Voice {
+  \new Staff = "one" \context Voice {
     c1
     \change Staff=two
     b2 a
   }
-  \context Staff = "two" {\clef bass \skip 1*2 }
+  \new Staff = "two" {\clef bass \skip 1*2 }
 >>
 
 

diff --git a/input/screech-boink.ly b/input/screech-boink.ly
index 619d0c68a12c2bb54580cc9cb3bc24addcf3244e..bea173358108d4d04c4ee4a973f5361274812d21 100644 (file)
--- a/input/screech-boink.ly
+++ b/input/screech-boink.ly
@@ -7,7 +7,7 @@
 
 \score {
      \context PianoStaff <<
-       \context Staff = "up" {
+       \new Staff =  "up" {
            \time 4/8
            \key c \minor
 
@@ -32,7 +32,7 @@
           >>
        }
 
-       \context Staff = "down" {
+       \new Staff =  "down" {
            \clef bass
            \key c \minor
            \set subdivideBeams = ##f

diff --git a/input/test/ancient-font.ly b/input/test/ancient-font.ly
index 08a376f57316ea904dadba91af3ebfaac0671533..fc0cdf0fe48679cc16f349395cd5d95136a7c0b9 100644 (file)
--- a/input/test/ancient-font.ly
+++ b/input/test/ancient-font.ly
@@ -9,7 +9,7 @@ included in LilyPond's support of ancient notation.
 }
 
 
-upperStaff = \context GregorianStaff = "upperStaff" <<
+upperStaff = \new GregorianStaff =  "upperStaff" <<
   \context GregorianVoice <<
     \set Score.timing = ##f
 %   \set Score.forceAccidental = ##t %%%%%%%% FIXME: what happened to this property?
@@ -112,7 +112,7 @@ upperStaff = \context GregorianStaff = "upperStaff" <<
   >>
 >>
 
-lowerStaff = \context MensuralStaff = "lowerStaff" <<
+lowerStaff = \new MensuralStaff =  "lowerStaff" <<
   \context MensuralVoice <<
     
     % this is broken until further notice -- see refman

diff --git a/input/test/coriolan-margin.ly b/input/test/coriolan-margin.ly
index 5dd0737396e4dde72c7ca283bad33d0ee096d4a8..d888a0f6a7fd61af7d2ab32d5f4e41da243145cc 100644 (file)
--- a/input/test/coriolan-margin.ly
+++ b/input/test/coriolan-margin.ly
@@ -111,31 +111,31 @@ violoncello =  \relative c' {
 \book {
     \score {
       << 
-       \context StaffGroup ="legni" << 
-         \context Staff ="flauti" \flauti
-         \context Staff ="oboi" \oboi
-         \context Staff ="clarinetti" \clarinetti 
-         \context Staff ="fagotti" \fagotti 
+       \new StaffGroup = "legni" << 
+         \new Staff = "flauti" \flauti
+         \new Staff = "oboi" \oboi
+         \new Staff = "clarinetti" \clarinetti 
+         \new Staff = "fagotti" \fagotti 
        >>
-       \context StaffGroup ="ottoni" <<
-         \context Staff ="corni" \corni
-         \context Staff ="trombe" \trombe
+       \new StaffGroup = "ottoni" <<
+         \new Staff = "corni" \corni
+         \new Staff = "trombe" \trombe
        >>
-       \context StaffGroup ="timpani" <<
-         \context Staff ="timpani" \timpani
+       \new StaffGroup = "timpani" <<
+         \new Staff = "timpani" \timpani
         { 
           \skip 1 
           % Hmm: this forces a staff-bracket, that's good!
           % However, I can't find where is decided on staff-bracket yes/no
         }
        >>
-       \context StaffGroup ="archi" <<
-         \context GrandStaff ="violini" <<
-           \context Staff ="violinoI" \violinoI
-           \context Staff ="violinoII" \violinoII
+       \new StaffGroup = "archi" <<
+         \new GrandStaff = "violini" <<
+           \new Staff = "violinoI" \violinoI
+           \new Staff = "violinoII" \violinoII
          >>
-         \context Staff ="viola" \viola
-         \context Staff ="violoncello" \violoncello
+         \new Staff = "viola" \viola
+         \new Staff = "violoncello" \violoncello
        >>
       >>
       \layout {

diff --git a/input/test/fret-diagram.ly b/input/test/fret-diagram.ly
index 1db6b9db3fe72fdb5153854d7b8f68b381031660..8fd5381266d08ba0f7d76b612361b60a781adb5a 100644 (file)
--- a/input/test/fret-diagram.ly
+++ b/input/test/fret-diagram.ly
@@ -9,7 +9,7 @@
     <<
        \chords {d2 d d s fis fis fis s c c c}
        
-     \context Voice = "mel" {
+     \new Voice = "mel" {
 % simple D chord
 
     d'2 ^\markup \fret-diagram-verbose #'((mute 6) (mute 5) (open 4) (place-fret 3 2) (place-fret 2 3) (place-fret 1 2))

diff --git a/input/test/instrument-name-grandstaff.ly b/input/test/instrument-name-grandstaff.ly
index 0087b47192e6b5b4983a1bbf1d73d47bfd0e33f1..a231b5f3f8831b5841fdad2b97deaf0fc1e09c3b 100644 (file)
--- a/input/test/instrument-name-grandstaff.ly
+++ b/input/test/instrument-name-grandstaff.ly
@@ -5,11 +5,11 @@ individual @code{Staff}s. " }
 
 \score {
   
-   \context GrandStaff <<
-    \context Staff = "treble"    {
+   \new GrandStaff <<
+    \new Staff =  "treble"    {
       \set GrandStaff.instrument = "Violini  "
       \set Staff.instrument = " vn I" { c''4 }}
-    \context Staff = "bass" { \set Staff.instrument = " vn II" c''4 }>>
+    \new Staff =  "bass" { \set Staff.instrument = " vn II" c''4 }>>
 
 
 \layout {

diff --git a/input/test/ligature-vaticana.ly b/input/test/ligature-vaticana.ly
index 079bd8eeea785464c730786f7f13b8eee49eae5d..ed44d74a8fe09f6ac49dbb8cefc6dc3422d42b6e 100644 (file)
--- a/input/test/ligature-vaticana.ly
+++ b/input/test/ligature-vaticana.ly
@@ -7,7 +7,7 @@ calligraphic notes. "
 
 \include "gregorian-init.ly"
 
-cantus = \context VaticanaVoice = "cantus"  {
+cantus = \new VaticanaVoice = "cantus"  {
   \clef "vaticana-fa2"
   \[ f\melisma \quilisma g \auctum \descendens a\melismaEnd \]
   \[ \virga a\melisma g \pes a \inclinatum f \inclinatum d
@@ -17,7 +17,7 @@ cantus = \context VaticanaVoice = "cantus"  {
   \[ e\melisma \flexa d\melismaEnd \]
 }
 
-verba = \context Lyrics = "verba" \lyricmode {
+verba = \new Lyrics = "verba" \lyricmode {
   Al- le- lu- ia.
 }
 

diff --git a/input/test/music-box.ly b/input/test/music-box.ly
index 43baa88b3facbbb066a23831cef0eab53cb64ade..177cd34a90a1cedacf6295e62bbd5cd52536244e 100644 (file)
--- a/input/test/music-box.ly
+++ b/input/test/music-box.ly
@@ -73,8 +73,8 @@ endc =  {\stemDown \tieDown c,,2~c,, c,,~c,, c,,1_\fermata }
 
 \score {
    \transpose c c' \context PianoStaff <<
-       \context Staff = "up"   { \clef "G"  }
-       \context Staff = "down" { \clef "F" }
+       \new Staff = "up"   { \clef "G"  }
+       \new Staff = "down" { \clef "F" }
        { \applyMusic #transform {
           \pat {c e g c' e' }
           \pat {c d a d' f' }

diff --git a/input/test/slur-manual.ly b/input/test/slur-manual.ly
index 12ff85356f9461195cb12bed0512e590cb9ca19d..93d4f6946700be68b60173f3be2f64df373d308b 100644 (file)
--- a/input/test/slur-manual.ly
+++ b/input/test/slur-manual.ly
@@ -13,11 +13,11 @@
 \score {
      \new PianoStaff
     <<
-       \context Staff = "up" {
+       \new Staff =  "up" {
            \clef bass
            s1 * 4
        } 
-       \context Staff = "down" \relative c <<
+       \new Staff =  "down" \relative c <<
            s1*4
            {
            \clef bass

diff --git a/input/test/temporary-stave.ly b/input/test/temporary-stave.ly
index 8ffeacbb249d7c34a099938c34681b5fa630c853..4a4cd8abaa035701881bb2f59994d2963f496cad 100644 (file)
--- a/input/test/temporary-stave.ly
+++ b/input/test/temporary-stave.ly
@@ -13,10 +13,10 @@ time and key signatures and clef at the beginning of the extra stave.
 \score {
    {
     \relative c' {
-      \context Staff = One { c4 d e f }
+      \new Staff = One { c4 d e f }
       <<
         {c d e f | c d e f | c c c c | c c c c }
-        \context TemporaryStaff = Two { c4 c8 d e4 f | c d e f |
+        \new TemporaryStaff = Two { c4 c8 d e4 f | c d e f |
           c c c c | c c c8 b c b |}
       >>
       c4 d e f |

diff --git a/input/twinkle-pop.ly b/input/twinkle-pop.ly
index 78232a7731f8402e515425c22c23fb2f73afc5ea..38d281e0652a228ee2a19265e23278b9b37dd484 100644 (file)
--- a/input/twinkle-pop.ly
+++ b/input/twinkle-pop.ly
@@ -20,7 +20,7 @@ melodie = \relative c'' {
   | f4 f  | e e  | d d | c2 \bar "|."
 }
 
-acc = \chordmode {
+acc = \chords {
   c2 c f c
   f c g:7 c
   g f c  g:7
@@ -30,7 +30,7 @@ acc = \chordmode {
   f c g:7 c
 }
 
-text = \lyricmode{ 
+text = \lyrics { 
   \override LyricText  #'font-shape = #'italic
 
   Ah!4 vous dir -- ai -- je ma man2
@@ -44,9 +44,9 @@ text = \lyricmode{
 
 \score {
   <<  
-    \context ChordNames \acc
-    \context Staff = "melody" \melodie
-    \context Lyrics \text
+    \acc
+    \new Staff = "melody" \melodie
+    \text
   >>
   \header{
     title = "Ah, vous dirais-je, maman "

diff --git a/input/wilhelmus.ly b/input/wilhelmus.ly
index 5c334ceac223c82c57c29df98acfd86c304ed7fa..2cbc5f8417d4b56d418dc68b7a4adfb507e93991 100644 (file)
--- a/input/wilhelmus.ly
+++ b/input/wilhelmus.ly
@@ -177,8 +177,8 @@ oneHalfNoteTime = \markup {
       \override Staff.TimeSignature #'text = #oneHalfNoteTime
       \noclefs
     
-      \context Voice = "voice" \voice
-      \context Voice = "stich" \stich
+      \new Voice =  "voice" \voice
+      \new Voice =  "stich" \stich
     >>
     \lyricsto "voice" \new Lyrics {
       \override VerticalAxisGroup #'minimum-Y-extent = #'(2 . 2)

diff --git a/lily/modified-font-metric.cc b/lily/modified-font-metric.cc
index 8e215863a6109a600344a11ae9c181491b2f5a39..52eee67268a60e6253b0e95db5e2b36a4bc0bcd1 100644 (file)
--- a/lily/modified-font-metric.cc
+++ b/lily/modified-font-metric.cc
@@ -180,15 +180,18 @@ Box
 Modified_font_metric::text_dimension (string text) const
 {
   SCM stext = scm_makfrom0str (text.c_str ());
-  Box b = lookup_tex_text_dimension (orig_, stext);
-  if (!b[Y_AXIS].is_empty ())
-    {
-      b.scale (magnification_);
-      return b;
-    }
-
+  
+  Box b;
   if (output_backend_global == "tex")
     {
+      b = lookup_tex_text_dimension (orig_, stext);
+
+      if (!b[Y_AXIS].is_empty ())
+       {
+         b.scale (magnification_);
+         return b;
+       }
+
       b = tex_kludge (text);
       return b;
     }

diff --git a/lily/text-metrics.cc b/lily/text-metrics.cc
index 2b6d57e538f81ceff99aee5e7b388b7a80597976..164d0062ffdf5452a97560207321591c2fe1347a 100644 (file)
--- a/lily/text-metrics.cc
+++ b/lily/text-metrics.cc
@@ -18,6 +18,10 @@ lookup_tex_text_dimension (Font_metric *font, SCM text)
 {
   Box b;
 
+  /*
+    Actually, it's defined in framework-texstr, but let's see how long
+    it takes before we get a bugreport. HWN 13/2/2006.
+   */
   SCM limit = ly_lily_module_constant ("TEX_STRING_HASHLIMIT");
   string key_str = ly_scm2string (font->font_file_name ());
   int hash_code = scm_to_int (scm_hash (text, limit));

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 7157fcba4d6115e184e69567babcd9f5ac0b71ff..3ac61bc13d8308316da8a0799a6911b1a36ec8e1 100644 (file)
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -732,6 +732,7 @@
        (self-alignment-Y . ,CENTER)
        (meta . ((class . Spanner)
                 (interfaces . (system-start-text-interface
+                               system-start-delimiter-interface
                                side-position-interface
                                font-interface))))))
 

diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm
index 899e2c26f3465b03cfa2e84e0e10eb7d98b6124d..eee2783965a94cc0b9afdebcfe931b1b9df8f43e 100644 (file)
--- a/scm/define-markup-commands.scm
+++ b/scm/define-markup-commands.scm
@@ -549,10 +549,16 @@ line-width, where X is the number of staff spaces."
 (def-markup-command (column layout props args) (markup-list?)
   "Stack the markups in @var{args} vertically.  The property
 @code{baseline-skip} determines the space between each markup in @var{args}."
-  (stack-lines
-   -1 0.0 (chain-assoc-get 'baseline-skip props)
-   (remove ly:stencil-empty?
-          (map (lambda (m) (interpret-markup layout props m)) args))))
+
+  (let*
+      ((arg-stencils (map (lambda (m) (interpret-markup layout props m)) args))
+       (skip (chain-assoc-get 'baseline-skip props)))
+
+    
+    (stack-lines
+     -1 0.0 skip
+     (remove ly:stencil-empty? arg-stencils))))
+
 
 (def-markup-command (dir-column layout props args) (markup-list?)
   "Make a column of args, going up or down, depending on the setting

diff --git a/scm/output-texstr.scm b/scm/output-texstr.scm
index 62fe1547a495b149edaf9156254c0b52c43b66e0..6d82d6ec0552b98f07642894aa925cbb0849797b 100644 (file)
--- a/scm/output-texstr.scm
+++ b/scm/output-texstr.scm
@@ -27,7 +27,9 @@
       what
       ""))
 
-(define TEX_STRING_HASHLIMIT 10000000)
+
+;; TeX C++ code actually hooks into TEX_STRING_HASHLIMIT 
+(define-public TEX_STRING_HASHLIMIT 10000000)
 (define-public (text font str)
   (call-with-output-string
    (lambda (port)