From: Mats Bengtsson <mats.bengtsson@s3.kth.se>
Date: Wed, 29 Oct 2008 21:49:30 +0000 (+0100)
Subject: Updated \cresc and \dim to only give text style for the current dynamics (just as... 
X-Git-Tag: release/2.11.64-1~113
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e501062bb48608c50b96f37ad8f0e23f03a90453;p=lilypond.git

Updated \cresc and \dim to only give text style for the current dynamics (just as they did in version 2.10 and earlier).
---

diff --git a/ly/spanners-init.ly b/ly/spanners-init.ly
index e86ea4ea74..28c4574019 100644
--- a/ly/spanners-init.ly
+++ b/ly/spanners-init.ly
@@ -21,30 +21,27 @@ stopTrillSpan = #(make-span-event 'TrillSpanEvent STOP)
 % STOP: junkme!
 cresc =  {
   #(ly:export (make-event-chord (list cr)))
-  \set crescendoText = \markup { \italic "cresc." }
-  \set crescendoSpanner = #'text
+  \once \set crescendoText = \markup { \italic "cresc." }
+  \once \set crescendoSpanner = #'text
 }
 
 
 dim =  {
   #(ly:export (make-event-chord (list decr)))
-
-  \set decrescendoText = \markup { \italic "dim." }
-  \set decrescendoSpanner = #'text
+  \once \set decrescendoText = \markup { \italic "dim." }
+  \once \set decrescendoSpanner = #'text
 }
 
 enddim =  {
   #(ly:export (make-event-chord (list enddecr)))
-  \unset decrescendoText 
-  \unset decrescendoSpanner 
+%  \unset decrescendoText 
+%  \unset decrescendoSpanner 
 }
 
-% ah, this is handy: maybe drop resetting of properties in
-% dynamic-engraver ?
 endcresc =  {
   #(ly:export (make-event-chord (list endcr)))
-  \unset crescendoText 
-  \unset crescendoSpanner 
+%  \unset crescendoText 
+%  \unset crescendoSpanner 
 }
 
 %%%%%%%%%%%%%%%%