From b73744950499028cc1d881e96c5c75a9287c62b4 Mon Sep 17 00:00:00 2001
From: hanwen <hanwen>
Date: Mon, 2 Aug 2004 18:01:20 +0000
Subject: [PATCH] *** empty log message ***
---
input/regression/slur-script.ly | 13 ++++---------
ly/music-functions-init.ly | 3 ++-
2 files changed, 6 insertions(+), 10 deletions(-)
diff --git a/input/regression/slur-script.ly b/input/regression/slur-script.ly
index 17bdd37121..7eadad134f 100644
--- a/input/regression/slur-script.ly
+++ b/input/regression/slur-script.ly
@@ -9,25 +9,20 @@
}
\version "2.3.7"
-\paper { raggedright = ##t }
+\paper {
+ raggedright = ##t
+}
\relative
{
b4-.( b-. b-.)
-
b(-. d-.)
- d(-. b-.)
-
- b--( b-- b--)
- b->( b-> b->)
- b-.--( b-.-- b-.--)
- b---.( b---. b---.)
b_1( b b_1_2_3)
c-1_\markup { \italic {"cresc."}}( f c)
- c-1( f\f c)
c-1( c\f c)
\once \override Script #'padding = #1.2
b-.( b-.
\once \override Script #'padding = #1.2
b-.)
+ e=''16[-.( f-.)]
}
diff --git a/ly/music-functions-init.ly b/ly/music-functions-init.ly
index 6392d0933a..2a3ece31bb 100644
--- a/ly/music-functions-init.ly
+++ b/ly/music-functions-init.ly
@@ -4,7 +4,8 @@
applymusic = #(def-music-function (location func music) (procedure? ly:music?)
(func music))
-addlyrics = #(def-music-function (location music lyrics) (ly:music? ly:music?)
+oldaddlyrics = #(def-music-function (location music lyrics) (ly:music? ly:music?)
+
(make-music 'LyricCombineMusic
'origin location
'elements (list music lyrics)))
--
2.39.5