From 9f10247b547291192861431d9dd361ec5478e8dd Mon Sep 17 00:00:00 2001
From: erik <erik>
Date: Thu, 19 Aug 2004 13:51:20 +0000
Subject: [PATCH] Fixed bug with \setTextDecresc.
---
ChangeLog | 4 ++++
ly/spanners-init.ly | 16 ++++++++++++----
2 files changed, 16 insertions(+), 4 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index f4bb8a25aa..98d9f3d90b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-08-19 Erik Sandberg <ersa9195@student.uu.se>
+
+ * ly/spanners-init.ly: Correct meanings of setTextDecresc/Dim, added setHairpinDecresc/Dim
+
2004-08-19 Jan Nieuwenhuizen <janneke@gnu.org>
* lily/include/lily-guile.hh: Cosmetics.
diff --git a/ly/spanners-init.ly b/ly/spanners-init.ly
index e8acaa1a0c..138314b01c 100644
--- a/ly/spanners-init.ly
+++ b/ly/spanners-init.ly
@@ -54,17 +54,25 @@ setTextCresc = {
\set crescendoSpanner = #'dashed-line
}
setTextDecresc = {
- \set crescendoText = \markup { \italic "decr." }
- \set crescendoSpanner = #'dashed-line
+ \set decrescendoText = \markup { \italic "decr." }
+ \set decrescendoSpanner = #'dashed-line
}
setTextDim = {
- \set crescendoText = \markup { \italic "dim." }
- \set crescendoSpanner = #'dashed-line
+ \set decrescendoText = \markup { \italic "dim." }
+ \set decrescendoSpanner = #'dashed-line
}
setHairpinCresc = {
\unset crescendoText
\unset crescendoSpanner
}
+setHairpinDecresc = {
+ \unset decrescendoText
+ \unset decrescendoSpanner
+}
+setHairpinDim = {
+ \unset decrescendoText
+ \unset decrescendoSpanner
+}
--
2.39.5