From 9af5b7fc9d69a8d8da1cd2bcc3bfabf0fa25ac47 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Wed, 27 Mar 2002 00:34:48 +0000
Subject: [PATCH] lilypond-1.3.118
---
debian/rules | 8 +++-
input/bugs/guile-state.ly | 77 +++++++++++++++++++++++++++++++++++++++
2 files changed, 84 insertions(+), 1 deletion(-)
create mode 100644 input/bugs/guile-state.ly
diff --git a/debian/rules b/debian/rules
index de648132d4..b3aa3e6391 100644
--- a/debian/rules
+++ b/debian/rules
@@ -104,7 +104,13 @@ binary-arch: build install
# dh_installcron
# dh_installmanpages
# dh_undocumented
- dh_installchangelogs -k CHANGES
+# dh_installchangelogs -k CHANGES
+# dh_installchangelogs CHANGES
+# These give all errrors.
+# Strange, in the maint-guide, it says add the upstream changelog name.
+# Let's install as doc, then. --jcn
+ dh_installdocs CHANGES
+ dh_installchangelogs
dh_link
dh_strip
dh_compress
diff --git a/input/bugs/guile-state.ly b/input/bugs/guile-state.ly
new file mode 100644
index 0000000000..5295650d3e
--- /dev/null
+++ b/input/bugs/guile-state.ly
@@ -0,0 +1,77 @@
+\header{
+texidoc=3D"Real header: the slurBeginAttachment setting still lives in the
+second example, breaking the cross staff broken slur.
+";
+}
+=09
+\header{
+texidoc=3D"
+Slurs can be forced to always attach to note heads.
+";
+}
+
+
+\score{
+ \notes \relative c''{
+ \property Voice.VerticalDirection =3D #1
+ \property Voice.slurBeginAttachment =3D #'head
+ \property Voice.slurEndAttachment =3D #'head
+ g16()g()g()g()d'()d()d()d
+ }
+ \paper{
+ indent =3D 0.0;
+ linewidth =3D 60.0\mm;
+ }
+}
+=09
+\header{
+texidoc=3D"
+The same goes for slurs. They behave decently when broken across
+linebreak.
+";
+}
+
+\score{
+ \context PianoStaff <
+ \context Staff=3Done \notes\relative c'{
+%{
+ \stemUp \slurUp
+ c4( c \translator Staff=3Dtwo c )c |
+ \translator Staff=3Done
+ \stemUp \slurUp
+ c4( c \translator Staff=3Dtwo c )c |
+ \stemUp \slurUp
+ c4( c \translator Staff=3Done c )c |
+ \translator Staff=3Dtwo
+ \stemUp \slurUp
+ c4( c \translator Staff=3Done c )c |
+ \translator Staff=3Dtwo
+ \stemUp \slurUp
+ c4( \translator Staff=3Done c c )c |
+%}
+ r2
+ \translator Staff=3Dtwo
+ \stemUp \slurUp
+ c4( \translator Staff=3Done c
+ \break
+ c )c
+ r2
+
+%{
+ \stemDown \slurDown
+ d4( \translator Staff=3Dtwo c c \translator Staff=3Done )d
+ \translator Staff=3Dtwo
+ \stemUp \slurUp
+ c4( \translator Staff=3Done c c \translator Staff=3Dtwo )c
+ r1
+%}
+ }
+ \context Staff=3Dtwo \notes\relative c'{
+ \clef bass;
+ s1 s1 %s1 s1 s1 s1 s1 s1 s1 s1
+ }
+ >
+ \paper { indent =3D 0.; linewidth =3D 40.*\staffspace; }
+}
+
+\version "1.3.110";=20
--
2.39.5